Assigning a variable and pasting variable to last unused column.

Hi all.
Rather then waste another 4 hours trying to figure this out, ill just ask.

I need to assign a variable to equal a Constant variable, then I need to find the last unused row on the worksheet, then paste that variable down the column (1-12200 or so rows). I also need to assign Strings for the first two Rows in the target column.

Please Login or Register  to view this content.

Sorry, dont have much VB experience.

That's not much code to start with. Please upload your sheet as we need to see how the data is distributed.

Start by recording your steps and I think you should use the Edit -> GoTo -> Special for this.

We'll make sensable code out of that.

Originally Posted by rwgrietveld

That's not much code to start with. Please upload your sheet as we need to see how the data is distributed.

Start by recording your steps and I think you should use the Edit -> GoTo -> Special for this.

We'll make sensable code out of that.

My problem is I dont know exactly how to code the rest.. Prior to this I have numerous Calls to populate the sheet. This code has to occur after them. I need to count the used columns, and find the last unused one, then paste the String PressureFilterDrop and then the Units °C then the variable.
Basically it'll look like this in Excel


FilterFlow TransferMassFlow FilterPressureDrop
m³/s g/s °C
0.001545833 0.593156197 -99
0.001546667 0.595364971 -99
0.001546667 0.595364971 -99
0.001546667 0.595364971 -99
0.001546667 0.597172149 -99
ect
ect

to End Rows

Insert a Module and paste this and play it.

Please Login or Register  to view this content.

Originally Posted by Kenneth Hobson

Insert a Module and paste this and play it.

Please Login or Register  to view this content.

Ahh, that would work well, but.. I dont know where the Range is I need to paste. I need to count the Rows and Columns store them in strings and then paste this at the first unused column, until the endrow. Like a perfect box of data.

Please Login or Register  to view this content.

Paste what? Store row and columns counts as strings? I see no purpose in that.


My code made your Before sheet look like your After sheet.

Maybe this will help you see what you want.

Please Login or Register  to view this content.

Otherwise, maybe someone else can see what you want.

please see the attached jpeg for a better idea.

I need find the last used column and increment by one which would be C, so the column i need to write to is D.

then I need to write my strings, Filterpressuredrop, and the units DegC.

I then need to count the rows used by the rest of the data, which wlould be 19 rows and only write -99 from ("D3:D19")only. I basically need to figure out the Range of the rest of the Data in the sheet and just paste this at the end column to the end row so it looks similar.

Reason for the counting is that the number of rows change quite frequently. This Data is coming from a system logging it @ 10Hz so its not perfect every time. The column names stay the same pretty much, but if I decide to add data channels later, i'd still like this to appear as the last column of data.