Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi i'm usong this macro
"Sub Button2_Click() Sheets("Sheet1").Range("E10").Value = _ Sheets("Sheet1").Range("E10").Value + 1 ActiveSheet.Range("Y4:AA12").PrintOut preview:=False End Sub" Which adds 1 to a count when the button is pressed what i want it to do is add a changing number from a cell, and then reset back to 1, Is it possible please Mike |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Maybe.....
Sub Button2_Click() dim myNumberToAdd as double Dim myExistingNumber as double myexistingNumber = Sheets("Sheet1").Range("E10").Value mynumbertoadd = Sheets("Sheet1").Range("x99").Value Sheets("Sheet1").Range("E10").Value = _ Sheets("Sheet1").Range("E10").Value + mynumbertoadd 'sheets("sheet1") instead of activesheet???? ActiveSheet.Range("Y4:AA12").PrintOut preview:=False sheets("sheet1").range("e10").value = myexistingnumber End Sub Mike wrote: Hi i'm usong this macro "Sub Button2_Click() Sheets("Sheet1").Range("E10").Value = _ Sheets("Sheet1").Range("E10").Value + 1 ActiveSheet.Range("Y4:AA12").PrintOut preview:=False End Sub" Which adds 1 to a count when the button is pressed what i want it to do is add a changing number from a cell, and then reset back to 1, Is it possible please Mike -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Macro recorded... tabs & file names changed, macro hangs | Excel Worksheet Functions | |||
Macro Help Needed - Excel 2007 - Print Macro with Auto Sort | Excel Worksheet Functions | |||
how to count/sum by function/macro to get the number of record to do copy/paste in macro | Excel Programming | |||
macro to delete entire rows when column A is blank ...a quick macro | Excel Programming | |||
Start Macro / Stop Macro / Restart Macro | Excel Programming |