EXCEL VBA to add blank rows to make them them a set of number -

hi need add blank rows 3 set od data make them 92 each.

for example have data a1:a85, a86:a167, a168:a248 wan make them 92 each set adding remaining blank rows. can has vba this. (first set 85 data points want add 7 blank rows make 92, second set 82 data points wan ad 10 blank rows wise)

your question little difficult understand, think know trying ask. range object less 92 rows, think want add additional blank rows, "padding" current region, 92 rows long. don't seem care columns. can add additional rows range object using it's .resize property. say, range("a1:a85") has 85 rows. somewhere inside procedure, use like

set myrange = range("a1").currentregion 'work 1 specific data set set myrange = myrange.resize(92-myrange.rows.count, 0) 'add rows count adds 92                                                        'but 0 columns 

you can view page on range.resize property more information. select...case routine add rows other data sets in worksheet. unfortunately, without seeing code no 1 can test verify.