Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Find and transpose adjacent values
Need code that does the following when run:
List of dates start in a1:a300 In a1: "12/31/09" Adjacent Names in b1"larry", c1"curly", d1"moe" Dates in E1:N65 (range name "calendar") When code is run... If date in a1 is found in named range, paste & transpose values under date. ie. if date in a1 is found in E20, paste values "larry" in e21 paste values "curly" in e22 paste values "moe" in e23 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Find and transpose adjacent values
J.W. Aldridge schrieb:
Need code that does the following when run: List of dates start in a1:a300 In a1: "12/31/09" Adjacent Names in b1"larry", c1"curly", d1"moe" Dates in E1:N65 (range name "calendar") When code is run... If date in a1 is found in named range, paste & transpose values under date. ie. if date in a1 is found in E20, paste values "larry" in e21 paste values "curly" in e22 paste values "moe" in e23 try something like this: Range("A1").select fo n=1 to 300 if Range("A" & n).value= whatever then Range("E"& n & ":N" & n).selct selection.copy Range("E" & n).select Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:= False, Transpose:=True else end if next n |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
transpose array of non-adjacent cells | Excel Worksheet Functions | |||
Find 2 values in adjacent columns simultaneously | Excel Programming | |||
Transpose a text string while copying adjacent column data to new | Excel Worksheet Functions | |||
Transpose to Non-adjacent Cells | Excel Programming | |||
Find all cells with "A" and add the values of the adjacent cell to give a total. | Excel Programming |