Excel VBA Course
Excel VBA Course - From Beginner to Expert

200+ Video Lessons
50+ Hours of Video
200+ Excel Guides

Become a master of VBA and Macros in Excel and learn how to automate all of your tasks in Excel with this online course. (No VBA experience required.)

View Course

Filling out into fields

0

Hello,

I'm stuck and no clue how to fix it
hope someone can helpme out

i like to get from sheet3 the column 3 to fill into sheet PriceCards
but i don't get them all the correct fields into sheet PriceCards
i need to get them beside each other and not under it

R = 2 ' the start row in the worksheet
Do While Len(Sheets("Sheet3").Range("A" & R).Formula) > 0
Sheets("PriceCards").Range("A" & R + 1).Value = Sheets("Sheet3").Range("C" & R).Value
R = R + 1 ' next row
countimages = R
Loop

here is a demofile

Thank you.

excel
MS Office Version: 2017
posted by: GhostofWanted (rep: 46) on Sat Aug 22, 2020 at 11:25 am
Answer
Discuss

Discussion

Looking at your demo file it appears that you just need to format rows 9, 10, & 11 of the PriceCards sheet to be the same as rows 3-8. If this is going to loop beyond row 11 then and some code to format the PriceCards row beofore entering the Sheet3 value.
WillieD24 (rep: 547) Aug 22, '20 at 6:30 pm
Hello,

Thank you for your message.
But how do i get it besides them and not under it?

PriceCards values are

A3 100,05
A4 65,01
A5 65,01
A6 65,01
A7 65,01
A8 65,01
A9 65,01
A10 65,01

but i like to get it as this
  A          C       E        G
100,05  65,01  65,01  65,01
  65,01  65,01  65,01  65,01

and so on.

how can i do that please
Thank you any help, please
Thanks
GhostofWanted (rep: 46) Aug 23, '20 at 1:00 am
Add to Discussion

Answers

0
Selected Answer

Hello GhostofWanted

Attached is your DemoFile updated with a possible solution for you. I copied "PriceCards" and simply called it "PriceCards 2". I added a code module (module1_New_Code) with two macros: 1) "Fill_PriceCard" which is your code amended with comments and enters the data from "Sheet3" to "PriceCrads 2"; 2) "Clear_PC_Data" which deletes the data in range "A3:H8" on "PriceCards 2"

On "PriceCards 2" I put two 'buttons (shapes) to easily run the macros.

If this is what you are looking to achieve then copy this to your "CommanButton1_Click" macro and edit sheet names as needed.

Cheers   ;-}

posted by: WillieD24 (rep: 547) on Sun Aug 23, 2020 at 11:30 am
Discuss

Discussion

Hello WillieD24,
that's so amazing
and even if i add more prices it don't overload them
just wow, thank you so much
i really appreciated it.
that's what i was after
thank you thank you
GhostofWanted (rep: 46) Aug 23, '20 at 12:08 pm
Add to Discussion


Answer the Question

You must create an account to use the forum. Create an Account or Login