<output id="qn6qe"></output>

    1. <output id="qn6qe"><tt id="qn6qe"></tt></output>
    2. <strike id="qn6qe"></strike>

      亚洲 日本 欧洲 欧美 视频,日韩中文字幕有码av,一本一道av中文字幕无码,国产线播放免费人成视频播放,人妻少妇偷人无码视频,日夜啪啪一区二区三区,国产尤物精品自在拍视频首页,久热这里只有精品12

      WPS中VB編輯器的安裝

      本來是因為要轉換很多個文件的列的位置,他們格式一樣,位置也一樣,就是需要轉換每個文件中列的位置,一個個操作又很麻煩,因此我在百度中發(fā)現(xiàn)了可以使用VBA進行操作,又由于excel里好像有VB編輯器,WPS中沒有,因此我需要自己下載

      下載鏈接如下:

      https://www.newasp.net/soft/456427.html

      下載好一路next就行,然后重啟WPS,就會發(fā)現(xiàn)開發(fā)工具那里不是灰色的了

       

      就說明已經安裝成功了

      然后按照自己的需求,轉換列的位置,參考了百度的方法,問題示例及代碼如下:

       

       

      Sub test()
      Dim arr, i&
      arr = Array("備注", "產品", "地址", "電話", "姓名")
      Application.ScreenUpdating = False
      For i = 0 To UBound(arr)
        Rows(1).Find(arr(i), lookat:=xlWhole).EntireColumn.Cut
         Columns(1).Insert Shift:=xlToRight
      Next i
      Application.ScreenUpdating = True
      End Sub

      示例和代碼主要參考網上的,鏈接注明:http://club.excelhome.net/forum.php?mod=viewthread&tid=1489014

      安裝VB參考鏈接:https://blog.csdn.net/weixin_38211198/article/details/90301647

      posted @ 2020-01-02 08:59  貓五  閱讀(4517)  評論(0)    收藏  舉報
      主站蜘蛛池模板: 韩国无码av片在线观看| 鹤峰县| 国产网友愉拍精品视频手机| 国产揄拍国产精品| 国内自拍偷拍一区二区三区| 亚洲丰满熟女一区二区v| 亚洲熟妇少妇任你躁在线观看无码| 亚洲av无码之国产精品网址蜜芽| 久久国产精品老女人| 亚洲一区二区中文av| 最近2019中文字幕免费看| 丰满爆乳一区二区三区| 黄男女激情一区二区三区| 亚洲熟妇在线视频观看| 亚洲中文字幕一区二区| 天堂中文8资源在线8| 99久久伊人精品综合观看| 性色欲情网站iwww九文堂| 久女女热精品视频在线观看| 精品一区二区三区自拍图片区| 久热这里只有精品12| 国产福利萌白酱在线观看视频| 开心五月激情五月俺亚洲| 久久亚洲精品国产精品婷婷| 东京热一精品无码av| 亚洲国产欧美日韩欧美特级| 99在线精品国自产拍中文字幕| 久久毛片少妇高潮| 一个色综合国产色综合| V一区无码内射国产| 久爱无码精品免费视频在线观看| 久久道精品一区二区三区| 高h纯肉无码视频在线观看| 一区二区三区av天堂| 一区二区三区精品自拍视频| 日韩乱码人妻无码中文字幕视频| 亚洲一区二区三区啪啪| gogogo高清在线观看视频中文 | 免费中文熟妇在线影片| 国99久9在线 | 免费| 69天堂人成无码免费视频|