Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
traceydee150
 
Posts: n/a
Default Indexing/Polulating Rows

I have 3 Sheets; Cal, Form & Employee List. Employee List has /names,
startdate and classes required all in columns w/rows a1:az56 as the
"database" list. Cal has a formula in a2 (=Form!C3 - which is a drop
down menu of Employee Names).

I want to populate the Form sheet (a select few rows and columns) based
on validation list box on Form a1 (based on database - names) and show
the classes taken - only if they have a x in the column based on the
employee name. It is now populating a single row and all the columns
and showing an x in the columns based on the name choosen.

Here's the code I have

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 3 And Target.Column = 3 Then
'calculate criteria cell in case calculation mode is manual
Worksheets("Cal").Range("A2").Calculate
Worksheets("EmployeeList").Range("Database") _
.AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Sheets("Cal").Range("A1:A2"), _
CopyToRange:=Range("a6:az6"), Unique:=False
End If
End Sub

I'm sure I'm doing everything wrong. I found the code and edited it my
needs. I'm hoping omeone can help me in easiest terms to get this
done.

Thank you

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
Rows & Columns in Excel seadragon69 Excel Worksheet Functions 2 December 7th 05 05:54 PM
Automatically inserting rows ausdiver99 Excel Worksheet Functions 1 June 2nd 05 02:15 PM
Hiding Rows if the linked rows are blank KG Excel Discussion (Misc queries) 9 May 18th 05 02:32 AM
Insert rows Mr. G. Excel Worksheet Functions 3 March 31st 05 03:49 AM
flexible paste rows function that inserts the right number of rows marika1981 Excel Discussion (Misc queries) 1 February 18th 05 02:40 AM


All times are GMT +1. The time now is 01:21 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"