[算表] 徵人幫寫excel巨集~5000P(已徵到)
軟體:excel
版本:2003
最近家中親戚要我幫他做excel表單管理,由於先前有在youtube看過巨集教學
感覺應該可以完成,就答應了,但實際操作後才發現困難重重...
問題很多,希望板上有高手能幫忙 Orz
這是我的檔案 http://dl.dropbox.com/u/26801667/eg.xls
師傅會把B~J的資料填滿,我的目標是做個巨集按鈕
1.選到哪一列,按完按鈕後就把整列資料複製到歷史紀錄的表單中
2.把剛才從維修狀況表單內剛複製過去的資料刪除(只刪除B~J)
經過我錄製和爬文後東拼西湊寫出的巨集如下
Sub test()
Dim row_1 As Integer
Dim row_2 As Integer
row_2 = 1
row_1 = Selection.Row
Rows(row_1).Select
Application.CutCopyMode = False
Selection.Copy
Sheets("歷史紀錄").Select
Do While (Sheets("歷史紀錄").Cells(row_2, 1) <> "")
row_2 = row_2 + 1
Loop
Rows(row_2).Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub
雖然可以複製過去,但是在複製五筆以上資料過去歷史紀錄時表單內的checkbox排序會
錯亂,還有清除B~J的部分我不會寫-.-
希望板上的高手們能幫忙一下~感謝!
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.64.164.169
→
03/23 16:01, , 1F
03/23 16:01, 1F
Office 近期熱門文章
PTT數位生活區 即時熱門文章