Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 14
Default Copy Values to empty cell below filled cells in selection

Hello

Please help me. I need a macro that will copy values to empty cell below
filled cells in selection.

Before After
110.03 3.23 110.03 3.23
116.01 116.01 3.23
125.02 125.02 3.23
155.01 155.01 3.23
155.05 155.05 3.23
155.06 155.06 3.23
167.01 167.01 3.23
169.01 169.01 3.23
176.01 176.01 3.23
181.01 181.01 3.23
181.02 181.02 3.23
182.01 182.01 3.23
184.01 184.01 3.23
116.01 4.2 116.01 4.2
125.02 125.02 4.2
135.03 135.03 4.2
155.01 155.01 4.2
155.05 155.05 4.2
155.06 155.06 4.2
162.01 162.01 4.2
169.01 169.01 4.2
176.01 176.01 4.2
176.02 176.02 4.2
181.01 181.01 4.2
100.01 5.24 100.01 5.24
116.01 116.01 5.24
116.02 116.02 5.24
125.02 125.02 5.24
147.01 147.01 5.24
155.01 155.01 5.24
155.04 155.04 5.24
155.05 155.05 5.24
155.06 155.06 5.24
162.01 162.01 5.24
167.01 167.01 5.24
169.01 169.01 5.24
176.01 176.01 5.24

Thank you very much

Best regards,

Harn

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 2,836
Default Copy Values to empty cell below filled cells in selection

Let's say values in ColumnC are filled in and you want to fill in values in
ColumnD:
Sub FillEmpties()
Dim lastrow As Long
lastrow = ActiveSheet.Cells(Rows.Count, "C").End(xlUp).Row
Range("D2:D" & lastrow).Select
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.FormulaR1C1 = "=R[-1]C"
End Sub

Also:
http://www.contextures.com/xlDataEntry02.html

HTH,
Ryan---

--
Ryan---
If this information was helpful, please indicate this by clicking ''Yes''.


"Harn88" wrote:

Hello

Please help me. I need a macro that will copy values to empty cell below
filled cells in selection.

Before After
110.03 3.23 110.03 3.23
116.01 116.01 3.23
125.02 125.02 3.23
155.01 155.01 3.23
155.05 155.05 3.23
155.06 155.06 3.23
167.01 167.01 3.23
169.01 169.01 3.23
176.01 176.01 3.23
181.01 181.01 3.23
181.02 181.02 3.23
182.01 182.01 3.23
184.01 184.01 3.23
116.01 4.2 116.01 4.2
125.02 125.02 4.2
135.03 135.03 4.2
155.01 155.01 4.2
155.05 155.05 4.2
155.06 155.06 4.2
162.01 162.01 4.2
169.01 169.01 4.2
176.01 176.01 4.2
176.02 176.02 4.2
181.01 181.01 4.2
100.01 5.24 100.01 5.24
116.01 116.01 5.24
116.02 116.02 5.24
125.02 125.02 5.24
147.01 147.01 5.24
155.01 155.01 5.24
155.04 155.04 5.24
155.05 155.05 5.24
155.06 155.06 5.24
162.01 162.01 5.24
167.01 167.01 5.24
169.01 169.01 5.24
176.01 176.01 5.24

Thank you very much

Best regards,

Harn

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
fill in empty cells beneath filled ones Kurt[_3_] Excel Programming 3 November 24th 07 01:49 PM
Excel- find the last filled cells in column with empty cells [email protected] Excel Programming 1 September 28th 07 12:20 AM
Macro Request: Fill in empty cells with previous Filled cell in column Artis Excel Worksheet Functions 2 June 25th 07 08:30 PM
Copy Data From Filled to Empty Cells Sheikh Saadi Excel Discussion (Misc queries) 0 November 10th 05 07:21 PM
SOS VBA Code Emergency: need to copy tell to empty cell direct below where values in adjacent cells in different column are equal to each other. Steven Rosenberg Excel Programming 4 August 5th 03 05:05 AM


All times are GMT +1. The time now is 10:25 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"