Unanswered: Copying values from one tab to another
I'm sure this is covered somewhere in the forum, but anyway...I would like to be able to take several values in a column, and paste them into a row on a different tab within the same worksheet (and put the code behind a command button). For instance:
upon clicking the button...
a. find the next blank row on tab 2
b. start at Column A
c. paste values from tab 1 as
This is one way, depending on what you readly want to do.
Dim Thisrange As Range
Dim cel As Range
Dim vRow As Variant
Dim j As Integer
Dim iRow As Integer
Set Thisrange = Selection
If Thisrange.Columns.Count > 1 Then
MsgBox "Only columns selection is permitted."
iRow = ActiveCell.Row + 1
For Each cel In Thisrange
j = j + 1
.Cells(iRow, j) = cel
This code should be pasted in a separate Code Module (not the sheet or ThisWorkbook).
The sub should be called from the button click of a button on Sheet1 (or wherever).
It also requires for the data to be copied to be selected (in the column only).