Cells copying and pasting in a empty cell of another sheet

Solved/Closed

Parker - Jan 7, 2020 at 09:46 AM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 - Jan 30, 2020 at 11:36 AM

Hello,

One Excel file has 2 Sheets. First sheet called "source" and second one called "Bestand"
In sheet "source" one cell (a1 for example) must be copied and paste in sheet "bestand" in row 1.
In Row 1, I could have already datas in cells a1,b1,c1,...., cn. So pasting must be done in the next free cell of row1

How can i do this with VBA-Macro?

Thanks

System Configuration: Windows / Edge 17.17134

Cells copying and pasting in a empty cell of another sheet
Little alchemy cheat sheet - Guide
An example of a cell is a blank cell ✓ - Programming Forum
Google sheet right to left - Guide
Excel macro to create new sheet based on value in cells - Guide
If cell contains date then return value ✓ - Office Software Forum

1 response

Answer 1 / 1

TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 552
Jan 30, 2020 at 11:36 AM

Hi Parker,

The following VBA code will do as requested:

Sub RunMe()
Sheets("Bestand").Cells(1, Columns.Count).End(xlToLeft).Offset(0, 1).Value = Sheets("Source").Range("A1").Value
End Sub

Best regards,
Trowa

Similar discussions

help me to add particular cells

If a cell contains any text then add a value

How to use conditional format based on text?

Counting cells containing only numbers

Root directory is full or errors during pasting

Similar discussions

Subscribe To Our Newsletter!