Dim intCountClick As Integer
Private Sub Command1_Click()
intCountClick = intCountClick + 1
Text1.Text = intCountClick
End Sub
Private Sub Form_Load()
intCountClick = 0
End Sub
I cant seem to get that to work.... thats me, below is the code where i need to count the number of times the command button has been pushed.
Private Sub cmdAddProcess_Click()
Dim RealLastRow As Long
Dim RealLastColumn As Long
Range("A1").Select
RealLastRow = _
Cells.Find("*", [A1], , , xlByRows, xlPrevious).Row
RealLastColumn = _
Cells.Find("*", [A1], , , xlByColumns, xlPrevious).Column
Cells(RealLastRow, RealLastColumn).Offset(0, 0).Select
Selection.End(xlToLeft).Offset(0, 1).Select
ActiveCell.Value = Me.txtQty.Value
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Me.Process.Value
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = "=IF(INDEX('Glass-Process'!$A:$A……….very long
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = "=$O$2:$O$1000*IF(INDEX(…….
Me.txtQty.Value = ""
End Sub