Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi
Problem 1 I would like to create a button than when pressed would copy a larg filtered list to new workbook. Currently copy and past special/values results in memory running out as the entire shee contains 14,000+ rows. What macro can I use Problem 2 Does anyone know a good online resource with ready made macros? and list of all the possible commands that can be used in a macro Thank |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
problem 1
data is in column A with the column label at A1 modify this sub to suit you Public Sub test() Dim myrange As Range Set myrange = Worksheets("sheet1").Range(Range("a1"), Range("a1").End(xlDown)) myrange.AutoFilter Field:=1, Criteria1:="3", Operator:=xlAnd Set myrange = Worksheets("sheet1").Range(Range("a1"), Range("a1").End(xlDown)) myrange.Copy Destination:=Range("H6") End Sub and then put it under a command button or toolbar button. problem 2 try this url http://www.vbusers.com/downloads/download.asp cribology - ExcelForums.com wrote in message ... Hi, Problem 1) I would like to create a button than when pressed would copy a large filtered list to new workbook. Currently copy and paste special/values results in memory running out as the entire sheet contains 14,000+ rows. What macro can I use? Problem 2) Does anyone know a good online resource with ready made macros? and a list of all the possible commands that can be used in a macro? Thanks |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
1)
Try running this with the filtered sheet active: Sub Transfer() Dim Src As Worksheet Dim wbNew As Workbook Dim Trg As Worksheet Set Src = ActiveSheet Set wbNew = Workbooks.Add(1) Set Trg = wbNew.Sheets(1) Src.UsedRange.SpecialCells(xlCellTypeVisible).Copy _ Trg.Range("A1") End Sub 2) That list is almost endless. You should narrow your search to what you need. Let me also recommend that you spend time and money on a book on VBA programming. HTH. Best wishes Harald "cribology - ExcelForums.com" skrev i melding ... Hi, Problem 1) I would like to create a button than when pressed would copy a large filtered list to new workbook. Currently copy and paste special/values results in memory running out as the entire sheet contains 14,000+ rows. What macro can I use? Problem 2) Does anyone know a good online resource with ready made macros? and a list of all the possible commands that can be used in a macro? Thanks |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
THANKS FOR THE FEEDBACK IT WORKS A TREAT NOW
|
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Macro to copy an image (or picture) from one workbook to a new sheetin another workbook | Excel Worksheet Functions | |||
how do i copy data from the top cell of a filtered list to anothe. | Excel Worksheet Functions | |||
using macro to copy and paste filtered results, what if blank? | Excel Worksheet Functions | |||
Copy on filtered list | Excel Worksheet Functions | |||
Need a macro to copy a range in one workbook and paste into another workbook | Excel Programming |