| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
do loop until empty cell
I want to execute the following until the cell in Column E is EMPTY.
Range("E11").Select ActiveCell.FormulaR1C1 = "=+jan!RC+jan!RC[2]" (where jan is the 'PREVIOUS' sheet Range("G11:H11").Select Selection.ClearContents Range("E12").Select ActiveCell.FormulaR1C1 = "=+éðåÃ*ø!RC+éðåÃ*ø!RC[2]" Range("G12:H12").Select Selection.ClearContents Range("E13").Select |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
do loop until empty cell
RowCount = 11
do while Range("E" & RowCount) < "" Range("E" & RowCount).FormulaR1C1 = "=+jan!RC+jan!RC[2]" Range("G" & RowCount).ClearContents Range("H" & RowCount).ClearContents RowCount = RowCount + 1 loop "Helmut" wrote: I want to execute the following until the cell in Column E is EMPTY. Range("E11").Select ActiveCell.FormulaR1C1 = "=+jan!RC+jan!RC[2]" (where jan is the 'PREVIOUS' sheet Range("G11:H11").Select Selection.ClearContents Range("E12").Select ActiveCell.FormulaR1C1 = "=+éðåÃ*ø!RC+éðåÃ*ø!RC[2]" Range("G12:H12").Select Selection.ClearContents Range("E13").Select |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
do loop until empty cell
With ActiveSheet
lastrow = .Cells(.Rows.Count, "E").End(xlUp).Row .Range("E11").Resize(lastrow - 10).FormulaR1C1 = "=jan!RC+jan!RC[2]" .Range("G11").Resize(lastrow - 10, 2).ClearContents End With -- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "Helmut" wrote in message ... I want to execute the following until the cell in Column E is EMPTY. Range("E11").Select ActiveCell.FormulaR1C1 = "=+jan!RC+jan!RC[2]" (where jan is the 'PREVIOUS' sheet Range("G11:H11").Select Selection.ClearContents Range("E12").Select ActiveCell.FormulaR1C1 = "=+éðåàø!RC+éðåàø!RC[2]" Range("G12:H12").Select Selection.ClearContents Range("E13").Select |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Loop until cell is empty | Excel Programming | |||
| Loop to find next empty cell to the right not working. | Excel Programming | |||
| having probelms getting my loop to terminate on an array value read from an empty cell | Excel Programming | |||
| Loop all sheetsand delete empty rows | Excel Programming | |||
| Empty cells in For Loop | Excel Programming | |||
Hybrid Mode
