Home |
Search |
Today's Posts |
|
#1
|
|||
|
|||
Insert Code
I have some VBA code that I would like to insert into an excel worksheet
With ActiveCell.Columns .EntireColumn.Copy .EntireColumn.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False End With Application.CutCopyMode = False I thought all I would have to do is create a macro, use the macro editor and paste in this code instead and run that macro, and this code would run instead.....Thats not working.......how do i run this code?? -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...l-new/200510/1 |
#2
|
|||
|
|||
Insert Code
Try this ..
Press Alt+F11 to go to VBE Click Insert Module Paste the sub* below in the code window *containing your code Press Alt+Q to get back to Excel Test it out on a column with some formulas in your test sheet: Select any cell in the col, press Alt+F8, select "FreezeColumn" Run (The code will perform an "in-place" copy paste special values on the col, effectively killing all formulas in the col) Sub FreezeColumn() With ActiveCell.Columns .EntireColumn.Copy .EntireColumn.PasteSpecial Paste:=xlPasteValues, _ Operation:=xlNone, SkipBlanks:=False, Transpose:=False End With Application.CutCopyMode = False End Sub -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- "Derek Y via OfficeKB.com" <u13919@uwe wrote in message news:55f2dcfb20573@uwe... I have some VBA code that I would like to insert into an excel worksheet With ActiveCell.Columns .EntireColumn.Copy .EntireColumn.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False End With Application.CutCopyMode = False I thought all I would have to do is create a macro, use the macro editor and paste in this code instead and run that macro, and this code would run instead.....Thats not working.......how do i run this code?? -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.a...l-new/200510/1 |
#3
|
|||
|
|||
Insert Code
THANK YOU SOOO MUCH, i didn't have SUB and END SUB that was my problem........
thanks sooo very much! Max wrote: Try this .. Press Alt+F11 to go to VBE Click Insert Module Paste the sub* below in the code window *containing your code Press Alt+Q to get back to Excel Test it out on a column with some formulas in your test sheet: Select any cell in the col, press Alt+F8, select "FreezeColumn" Run (The code will perform an "in-place" copy paste special values on the col, effectively killing all formulas in the col) Sub FreezeColumn() With ActiveCell.Columns .EntireColumn.Copy .EntireColumn.PasteSpecial Paste:=xlPasteValues, _ Operation:=xlNone, SkipBlanks:=False, Transpose:=False End With Application.CutCopyMode = False End Sub -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- I have some VBA code that I would like to insert into an excel worksheet [quoted text clipped - 10 lines] paste in this code instead and run that macro, and this code would run instead.....Thats not working.......how do i run this code?? -- Message posted via http://www.officekb.com |
#4
|
|||
|
|||
Insert Code
Glad you found out what was missing <g !
-- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- "Derek Y via OfficeKB.com" <u13919@uwe wrote in message news:55f3ad2e0b6f3@uwe... THANK YOU SOOO MUCH, i didn't have SUB and END SUB that was my problem........ thanks sooo very much! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Change case...help please | Excel Worksheet Functions | |||
Macro for changing text to Proper Case | Excel Worksheet Functions | |||
Write code to insert multiple lines | Excel Discussion (Misc queries) | |||
Make Change Case in Excel a format rather than formula | Excel Worksheet Functions | |||
Challenging Charting | Charts and Charting in Excel |