Help appreciated
Any help please appreciated..
It seems I need to hit the command button twice in order for the code ito do the rezisng of the range properly. (60 rows and variable number of columns).If i hit the button only once it resets the range to something totally different. What is wrong??? Private Sub AddParameters_Click() Dim i As Integer Dim EngineRange As Range Dim Col As Integer Dim NewEng_Range As Range Set EngineRange = Range("Eng_Range") i = 60 Col = 1 Do Col = Col + 1 EngineRange.Resize(i, Col - 1).Name = "Eng_Range" Loop Until IsEmpty(EngineRange(Col)) EngineRange.Resize(i, Col - 1).Name = "NewEng_Range" End Sub |
All times are GMT +1. The time now is 05:06 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com