Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
coping cells
Saludos...
What would the code in vba be for the following , Kind of new vba and stil haven't got the hang of loops. I have a sheet the looks like the following. How can I make it so it copies CODE1 in the blank cells till it reaches code2 , then copy code 2 in the blank cells between code2 and 3 and so on. a b c Code 1 Juan 22 days Pedro 14 hrs Luis 15 day Code 2 Juan 5 days Pedro 3 hrs Luis 2 day Code 3 Juan 2 days and so on. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
coping cells
You can do it pretty easily by hand... Assuming Code 1 is in Cell A1 add this
formula to A2 =if(b2<"", A1, ""). Now copy Cell A2. Highlight A1:A100 (or however far you need to go) and hit F5 -Special Cells - Blanks - OK (all of the blanks in A1:A100 will now be selected) Paste the formula into the blanks... Now Copy column A and paste speacial values. if you need a macro to do this just record your actions while you do it... -- HTH... Jim Thomlinson "JJMNZ76" wrote: Saludos... What would the code in vba be for the following , Kind of new vba and stil haven't got the hang of loops. I have a sheet the looks like the following. How can I make it so it copies CODE1 in the blank cells till it reaches code2 , then copy code 2 in the blank cells between code2 and 3 and so on. a b c Code 1 Juan 22 days Pedro 14 hrs Luis 15 day Code 2 Juan 5 days Pedro 3 hrs Luis 2 day Code 3 Juan 2 days and so on. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
coping cells
Just modify ranges as needed:
Sub SameAsAbove() 'Copies data from cell above if current cell in range is blank Dim MyRange As Range Dim MyCell As Range Dim Endrow As Integer Endrow = Range("A65536").End(xlUp).Row Set MyRange = Range("A1:G" & Endrow) MyRange.Select On Error Resume Next For Each MyCell In MyRange If MyCell.Value = "" Then MyCell.Value = MyCell.Offset(-1, 0).Value End If Next MyCell End Sub JJMNZ76 wrote: Saludos... What would the code in vba be for the following , Kind of new vba and stil haven't got the hang of loops. I have a sheet the looks like the following. How can I make it so it copies CODE1 in the blank cells till it reaches code2 , then copy code 2 in the blank cells between code2 and 3 and so on. a b c Code 1 Juan 22 days Pedro 14 hrs Luis 15 day Code 2 Juan 5 days Pedro 3 hrs Luis 2 day Code 3 Juan 2 days and so on. |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
coping cells
Debra Dalgleish has some techniques:
http://www.contextures.com/xlDataEntry02.html JJMNZ76 wrote: Saludos... What would the code in vba be for the following , Kind of new vba and stil haven't got the hang of loops. I have a sheet the looks like the following. How can I make it so it copies CODE1 in the blank cells till it reaches code2 , then copy code 2 in the blank cells between code2 and 3 and so on. a b c Code 1 Juan 22 days Pedro 14 hrs Luis 15 day Code 2 Juan 5 days Pedro 3 hrs Luis 2 day Code 3 Juan 2 days and so on. -- Dave Peterson |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
coping cells
Thanks to all,
"Dave Peterson" wrote: Debra Dalgleish has some techniques: http://www.contextures.com/xlDataEntry02.html JJMNZ76 wrote: Saludos... What would the code in vba be for the following , Kind of new vba and stil haven't got the hang of loops. I have a sheet the looks like the following. How can I make it so it copies CODE1 in the blank cells till it reaches code2 , then copy code 2 in the blank cells between code2 and 3 and so on. a b c Code 1 Juan 22 days Pedro 14 hrs Luis 15 day Code 2 Juan 5 days Pedro 3 hrs Luis 2 day Code 3 Juan 2 days and so on. -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Retain Format When Coping Visible Cells Only to New Worksheet | Excel Programming | |||
Macro for coping cells from one worksheet to another | Excel Programming | |||
Coping numbers only in cells to other worksheets. | Excel Programming | |||
Trouble Coping Visible Cells | Excel Discussion (Misc queries) | |||
Coping all cells with data. | Excel Programming |