| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Code Not Working with Click Box
Hello,
The code below works perfectly well until I assign it to a click button. Working Code: Sub TransposeValues() Sheets("VAV List").Select Range("A2:A3").Select Selection.Copy Sheets("Sheet1").Select Range("C3").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True End Sub Once assigned to a click button, I get an error saying "Select Method of Range Class Failed" with Range("C3").Select highlighted as the culprit. Not Working Code: Private Sub CommandButton1_Click() Sheets("VAV List").Select Range("A2:A3").Select Selection.Copy Sheets("Sheet1").Select Range("C3").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True End Sub Please help Thanks |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Code Not Working with Click Box
This worked for me:
Sub TransposeValues() Sheets("VAV List").Range("A2:A3").Copy Sheets("Sheet1").Range("C3").PasteSpecial Paste:=xlPasteValues, _ Operation:=xlNone, SkipBlanks:=False, Transpose:=True End Sub "Mr. Matt" wrote: Hello, The code below works perfectly well until I assign it to a click button. Working Code: Sub TransposeValues() Sheets("VAV List").Select Range("A2:A3").Select Selection.Copy Sheets("Sheet1").Select Range("C3").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True End Sub Once assigned to a click button, I get an error saying "Select Method of Range Class Failed" with Range("C3").Select highlighted as the culprit. Not Working Code: Private Sub CommandButton1_Click() Sheets("VAV List").Select Range("A2:A3").Select Selection.Copy Sheets("Sheet1").Select Range("C3").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True End Sub Please help Thanks |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Code Not Working with Click Box
Did it work when assigned to a click box?
"JLGWhiz" wrote: This worked for me: Sub TransposeValues() Sheets("VAV List").Range("A2:A3").Copy Sheets("Sheet1").Range("C3").PasteSpecial Paste:=xlPasteValues, _ Operation:=xlNone, SkipBlanks:=False, Transpose:=True End Sub "Mr. Matt" wrote: Hello, The code below works perfectly well until I assign it to a click button. Working Code: Sub TransposeValues() Sheets("VAV List").Select Range("A2:A3").Select Selection.Copy Sheets("Sheet1").Select Range("C3").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True End Sub Once assigned to a click button, I get an error saying "Select Method of Range Class Failed" with Range("C3").Select highlighted as the culprit. Not Working Code: Private Sub CommandButton1_Click() Sheets("VAV List").Select Range("A2:A3").Select Selection.Copy Sheets("Sheet1").Select Range("C3").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True End Sub Please help Thanks |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Click right no working | Excel Discussion (Misc queries) | |||
| right mouse click not working | Excel Discussion (Misc queries) | |||
| click & drag not working | Excel Discussion (Misc queries) | |||
| My right click menu is not working. | Excel Discussion (Misc queries) | |||
| option buttons run Click code when value is changed via VBA code | Excel Programming | |||
Linear Mode
