插入一行特定數據-VBA宏

-1

我有一個包含大量數據的excel文件。數據按行集劃分。每集之後都有一個空白行。我正在尋找一個可以運行所有數據的宏，並且在空白行中的每組數據>之後，它應該如下所示。插入一行特定數據-VBA宏

對於實例

00059803  20-35-32 GBP 02/09/2014 Close 
00005486  20-35-32 GBP 02/09/2014 Close 
00004856  20-35-32 GBP 02/09/2014 Close 

---------------- ------------ ----------------    

04586680  20-45-05 GBP 02/09/2014 Close 
45866485  20-45-05 GBP 02/09/2014 Close 
45806654  20-45-05 GBP 02/09/2014 Close 

----------------- ------------- ---------------    

00485548  20-48-42 GBP 02/09/2014 Close 
04586455  20-48-42 GBP 02/09/2014 Close 
00004458  20-48-42 GBP 02/09/2014 Close 

----------------- ------------- --------------

我希望每個組與宏觀數據後插入「--- ---- -----」。請指教一個宏代碼。

來源

2014-09-03 Kaiser

你到目前爲止嘗試過什麼？使用宏錄像機開始。如果您遇到困難，我們將很樂意協助您修改您的需求。 – 2014-09-03 13:27:10

嘗試像

Sub PutInDashes() 
finalRow = cells(65000,1).end(xlup).row 
for i = 1 to finalRow 
    if isempty(cells(i,1)) then 
    for j = 1 to 5 
     cells(i,j) = "--------" 
    next j 
    end if 
next i 
end sub

雖然它很難看到你想要的列從你貼什麼破折號，這段代碼將它們放在前5列，那裏有一排空白單元格。

來源

2014-09-03 13:27:55

謝謝Matt，只有在表格頂部有幾行空行時，您的代碼才能正常工作。它在這些行中插入虛線，然後停止。如果在工作表頂部存在空行，那麼這根本就行不通。請指教。我希望宏檢查整個工作表並在每個數據集下用空行填充空白行。希望我能理解我在找什麼。謝謝 – Kaiser 2014-09-03 13:38:03

您的數據集有多少行？ – 2014-09-03 13:42:19

5列中的虛線很好我只想在幾個單元格中劃破以區分數據。基本上數據是在幾百行中，但它是在一組數據中，即10行中的一組數據>然後是三行中的空白行>另一組是5行中的數據>然後是三行中的空行>。我想要的是宏應該分析數據，並且在空白行中的每組數據下應該放置破折號。 – Kaiser 2014-09-03 13:52:24

插入一行特定數據-VBA宏

回答

相關問題