Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Send Keys
Thanks steve, this does the trick neatly.
Thanks to all others also, your suggestions also worked fine. Many thanks. -----Original Message----- Akshay, The following code works on the visible cells in A1:A11 Dim cel As Range For Each cel In Range("A1:A11").SpecialCells (xlCellTypeVisible) Cells(13, cel.Row) = cel Next see if you can apply it to your needs. -- sb "Akshay Bakhai" wrote in message ... I have a large list of data; on which I have applied automatic filtering. Thereafter, I use filter conditions on one of the columns only to show selected records. Thereafter I want to automatically run down this column and do specific actions for each value in this column. I am able to do everything I want EXCEPT run down this column. The ACTIVECELL.OFFSET(1,0) obviously gives the physically next record; and so is not useful. I tried SENDKEYS "{DOWN}" to simulate pressing the down key; but for some strange reason it takes me to the last item in that column !! I tried SENDKEYS "{ENTER}" to simulate pressing the ENTER key. But nothing happens. Thus, currently I have to manually press enter every time before triggering off my macro. Any help will be useful. I do not want to write a FIND routine because eventually in my filter I may set filter conditions on several fields and then run down a column; in which case my FIND routines may not be that reliable or scalable. Many thanks . |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Send Keys
Akshay,
You're very welcome! -- sb "Akshay Bakhai" wrote in message ... Thanks steve, this does the trick neatly. Thanks to all others also, your suggestions also worked fine. Many thanks. -----Original Message----- Akshay, The following code works on the visible cells in A1:A11 Dim cel As Range For Each cel In Range("A1:A11").SpecialCells (xlCellTypeVisible) Cells(13, cel.Row) = cel Next see if you can apply it to your needs. -- sb "Akshay Bakhai" wrote in message ... I have a large list of data; on which I have applied automatic filtering. Thereafter, I use filter conditions on one of the columns only to show selected records. Thereafter I want to automatically run down this column and do specific actions for each value in this column. I am able to do everything I want EXCEPT run down this column. The ACTIVECELL.OFFSET(1,0) obviously gives the physically next record; and so is not useful. I tried SENDKEYS "{DOWN}" to simulate pressing the down key; but for some strange reason it takes me to the last item in that column !! I tried SENDKEYS "{ENTER}" to simulate pressing the ENTER key. But nothing happens. Thus, currently I have to manually press enter every time before triggering off my macro. Any help will be useful. I do not want to write a FIND routine because eventually in my filter I may set filter conditions on several fields and then run down a column; in which case my FIND routines may not be that reliable or scalable. Many thanks . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Send keys with user input | Excel Worksheet Functions | |||
Send keys from command button | Excel Worksheet Functions | |||
Bypass: A program is trying to send mail using Item.Send prompt | Excel Discussion (Misc queries) | |||
Send Keys | Excel Programming | |||
Send Keys | Excel Programming |