国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 辦公 > Excel > 正文

excel怎樣移動(dòng)列?excel一鍵移動(dòng)列

2019-12-13 08:20:37
字體:
供稿:網(wǎng)友

excel中經(jīng)常需要移動(dòng)一整列,比如向左移動(dòng)一列,通常的方法是插入一列空列,然后將想要移動(dòng)的列復(fù)制過去,非常的麻煩,現(xiàn)在我們就要做一個(gè)簡(jiǎn)單的方法,一鍵移動(dòng)列。具體的方法需要用到vb,不過代碼我都給出來了,需要的直接復(fù)制過去就可以了,你也不必懂代碼,可以直接使用,方法如下:

軟件名稱:
Excel2003綠色版 EXCEL2003精簡(jiǎn)綠色版 (附excel2003綠色工具)
軟件大?。?/dt>
13.3MB
更新時(shí)間:
2012-06-19

1、在菜單欄上面點(diǎn)擊【開發(fā)工具】選項(xiàng),在該選項(xiàng)下,我們點(diǎn)擊【】按鈕,打開宏對(duì)話框。

2、打開了宏對(duì)話框,我們填寫宏名為【向左移動(dòng)一列】,然后點(diǎn)擊【創(chuàng)建】按鈕。

3、打開了宏編輯器,在這個(gè)模塊里,我們輸入如下代碼,然后點(diǎn)擊關(guān)閉。代碼如下:

Sub 向左移動(dòng)一列()
Application.ScreenUpdating = False
x = Selection.Column
If x >= 1 Then
Columns(x).Cut
Columns(x - 1).Insert
Application.ScreenUpdating = True
End If

End Sub

4、接著再次在菜單欄上執(zhí)行:開發(fā)工具--宏

5、在宏對(duì)話框中,輸入宏名為【向右移動(dòng)一列】,然后點(diǎn)擊創(chuàng)建

6、輸入如下代碼,然后點(diǎn)擊關(guān)閉按鈕。代碼如下:

Sub 向右移動(dòng)一列()
Application.ScreenUpdating = False
x = Selection.Column
If x < 256 Then
Columns(x).Cut
Columns(x + 2).Insert
End If
Application.ScreenUpdating = True

End Sub

7、返回到了vb編輯器,關(guān)閉它就可以返回到excel

8、在excel中,我們點(diǎn)擊想要移動(dòng)的這一列的列頭,也就是圖示中的字母E的位置,這樣就選中了整個(gè)列

9、接著我們點(diǎn)擊菜單欄上面的:開發(fā)工具--宏

10、點(diǎn)擊【向左移動(dòng)一列】,選中這個(gè)宏,然后點(diǎn)擊【執(zhí)行】。

11、我們看到這一列已經(jīng)移動(dòng)了,這就是效果圖:

12、如果你想要移動(dòng)的方向是向右移動(dòng)一列,你就要選擇另一個(gè)宏了。

 

以上就是excel一鍵移動(dòng)列方法介紹,操作很簡(jiǎn)單的,大家按照上面步驟進(jìn)行操作即可,希望能對(duì)大家有所幫助!
發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 海兴县| 黑水县| 海原县| 浪卡子县| 白水县| 玛纳斯县| 蒙自县| 苍梧县| 上蔡县| 牡丹江市| 大埔区| 揭西县| 侯马市| 广昌县| 仲巴县| 阜平县| 石台县| 资源县| 江川县| 徐水县| 富宁县| 珠海市| 永兴县| 营山县| 奉节县| 长汀县| 五峰| 怀化市| 凉城县| 仙桃市| 苍南县| 高平市| 峨山| 巨野县| 玛曲县| 乡宁县| 青铜峡市| 榆中县| 洪雅县| 凤阳县| 通辽市|