Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 4
Default Rows in macros

I have a table below has the fields as showing. I have another form
that I'm copying the data from this table to the form. I want to type
"Yes" under completed column when I go over the first row. It should
then go to the second row and do the same. I have the macro but I'm
stock with how to make it move to A3 then finish row 3 then go to A4
and so on until A$ = ""
Subject Type Rating Name email Completed
A2 B2 C2 D2 E2 F2
A3 B3 C3 D3 E3 F3
A4 B4 C4 D4 E4 F4
A5 B5 C5 D5 E5 F5
A6 B6 C6 D6 E6 F6
A7 B7 C7 D7 E7 F7
A8 B8 C8 D8 E8 F8

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 27
Default Rows in macros

Is this table ready to copy or people are still filling in ?
Below will fix your 10.000 rows.Change it to your needs.
Code checks A:E columns if all filled in puts a "yes" or "no".

Sub chkrows()

Dim rng As Range
Dim i As Range

With Worksheets("sheet1")
Set rng = .Range("a2:a10000")
End With

For Each i In rng
If Application.CountA(Worksheets("sheet1").Range("a" & i.Row & ":" &
"e" & i.Row)) = 5 Then
i.Offset(, 5).Value = "yes"
Else
i.Offset(, 5).Value = "no"
End If
Next i

end sub

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
macros deleting rows Anthony Excel Discussion (Misc queries) 1 July 19th 09 12:54 PM
Help on deleting rows using Macros ashel Excel Programming 2 October 5th 06 10:01 PM
Any way to highlight rows without using macros? Spalding Excel Discussion (Misc queries) 2 November 9th 05 03:12 PM
Deleting Rows using Macros bernard Excel Discussion (Misc queries) 3 August 8th 05 04:52 PM
accessing rows with macros Sam Excel Discussion (Misc queries) 3 April 18th 05 11:56 PM


All times are GMT +1. The time now is 11:57 PM.

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

About Us

"It's about Microsoft Excel"