Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Find empty cell and input data for other cells
Hi,
I want to move (cut paste?) cell content from columns D:F to the left by one position (offset?). When cell C is empty. This test I am trying is setup for only 4 rows d2:d5 (hear in rown 1), but the real work will have 2300 rows involved. This is a situation where data coming is to us is not formated correctly (i.e.) city,state,zip which should be situated in cells C,D & E is on some rows located in D,E & F Sub OffsetRange() Dim r As Range Dim myVar Dim myCell As Range Set myCell = Range("C2:c5") Dim c As Range Set c = Range("D:F") For Each r In Range("C2:C5" & Cells(Rows.Count, "c").End(xlUp).Row) myVar = IsEmpty(r.Value) If myVar = True Then ?????? I'm lost here End If Next End Sub Any help appreciated Rick |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
My Worksheet Needs to Input Cell Data Automatically to Other Cells | Excel Worksheet Functions | |||
Find empty cells, fill with text from cell above | Excel Worksheet Functions | |||
code to go down a column and find the last cell with data before an empty cell | Excel Programming | |||
Not allowing users to enter data into certain cells if another cell is empty | Excel Programming | |||
A macro to tell excel to input to next empty cell | Excel Programming |