| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
checking and copying cells
the sub below does not work. when it goes to the saved records worksheet it
does not go through the records. Worksheets("Saved Records").Activate For Each cell In Worksheets("Saved Records").Range("A2:A102") If cell.Text = name Then ActiveCell.EntireRow.Select Selection.Copy Worksheets("Temporary Record").Activate Worksheets("Temporary Record").Range("B1:B223").Select Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True 'Worksheets("Saved Records").Activate 'ActiveCell.EntireRow.Delete Exit For End If Next cell |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
checking and copying cells
Sub tst()
Worksheets("Saved Records").Activate For Each cell In Worksheets("Saved Records").Range("A2:A102") If cell.Value = "name" Then cell.EntireRow.Select Selection.Copy Worksheets("Temporary Record").Activate Worksheets("Temporary Record").Range("B1:B223").Select Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True 'Worksheets("Saved Records").Activate 'cell.EntireRow.Delete ''''''''''Exit For End If Next End Sub |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| checking input in a cell and return by copying info from a other c | Excel Worksheet Functions | |||
| Checking the Cells in Sheet1 with Cells in Sheet2 and replace | Excel Worksheet Functions | |||
| Checking in other tabs and copying to another tab Is that possible | Excel Discussion (Misc queries) | |||
| copying cells by checking color of the cells | Excel Programming | |||
| checking for empty rows before copying? | Excel Programming | |||
Linear Mode
