Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
How can i autofill cells
How can i autofill cells, with the textstring above it?
When a cell is blank fill it with the value above it. When a cell is filled, goto next cell. Thanks Taco |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
How can i autofill cells
Sub test()
Dim allcells As Range, cell As Range For Each cell In Range("a2:a100") 'a1 = error :) If cell.Value = "" Then cell.Value = cell.Offset(-1, 0).Value End If Next End Sub acces --- Message posted from http://www.ExcelForum.com/ |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
How can i autofill cells
On Error Resume Next
set rng = columns(1).specialcells(xlBlanks) On Error goto 0 if not rng is nothing then set rng.formula = "=" & rng(1).offset(-1,0).Address(0,0) for each cell in rng rng.Formula = rng.Value Next End if Assumes the first cell will not be blank. -- Regards, Tom Ogilvy "Taco" wrote in message ... How can i autofill cells, with the textstring above it? When a cell is blank fill it with the value above it. When a cell is filled, goto next cell. Thanks Taco |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Autofill of single cells | Excel Discussion (Misc queries) | |||
I can't autofill cells in a column if blank cells in between | Excel Worksheet Functions | |||
Autofill: Need to autofill one week block, (5) weekday only into cells. | Excel Discussion (Misc queries) | |||
autofill cells without a pattern? | Excel Discussion (Misc queries) | |||
Autofill skipping cells | Excel Worksheet Functions |