【看圖學Excel】選取部份圖形
想快速選取工作表上特定區域的圖形嗎？「常用>編輯>尋找與選取>選取物件」，畫個四方形把那些圖形圈起來，跟夾娃娃一樣！
追踪IG看圖學Excel：
https://www.instagram.com/b88104069/?r=nametag
加入Line社群學Excel：
https://line.me/ti/g2/zhLjcgh26SFxC8_3MccZLw?utm_source=invitation&utm_medium=link_copy&utm_campaign=default
加入看圖看影片學Excel臉書社團：
https://www.facebook.com/groups/excelsmartworking
excel選取工作表 在 [算表] excel選取儲存格範圍另存工作表-錄製巨集- 看板Office 的推薦與評價
軟體:excel
版本:2010
在excel一個工作表中有100位員工薪資條明細
每人都是固定17列6欄的儲存格範圍
已使用錄製巨集選取每位資料後
貼到新的工作表中
示範excel如下
https://reurl.cc/EKmZ81
程式碼如下
Sub 巨集1()
'
' 巨集1 巨集
'
'
ActiveCell.Range("A1:F17").Select
Selection.Copy
Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Paste
ActiveCell.Columns("A:F").EntireColumn.Select
ActiveCell.Offset(4, 0).Range("A1").Activate
Selection.ColumnWidth = 12.64
ActiveCell.Columns("A:A").EntireColumn.Select
ActiveCell.Activate
Selection.ColumnWidth = 15.71
Application.CutCopyMode = False
ActiveWorkbook.SaveAs Filename:="C:\Users\USER\Desktop\活頁簿25.xls", _
FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
Sheets("工作表1").Select
ActiveCell.Offset(18, 0).Range("A1:F1").Select
End Sub
1.不知如何修改成迴圈程式碼
可以順利執行100位的工作表
2.後續是否有可能可設定工作表命名皆為「201911」?
以及每個工作表另存獨立一個excel活頁簿檔案，檔名設為「某某某薪資條」
3.或者在問題1階段，先完成100個命名為「工作表00」
再另外用巨集的方式，重新按照名字命名
4.最後需要將每個excel獨立寄給100位員工，是否也可以用錄製巨集方式完成？
網路上找到有板友分享此方法
https://www.youtube.com/watch?v=YktQVwUdDrg
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 36.229.31.104 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1574182020.A.4E0.html
※ 編輯: quirrky (36.229.31.104 臺灣), 11/20/2019 00:48:18
... <看更多>