Hi,
I am not able to use keyboard to select the range. the codes works fine and as expected when i am using it in a normal macro but when i make the addin and tries to run the code from the menus bar it does not allow me to select the range with the help of the keyboard only mouse works . below is the partial part of the code.
I am not able to use keyboard to select the range. the codes works fine and as expected when i am using it in a normal macro but when i make the addin and tries to run the code from the menus bar it does not allow me to select the range with the help of the keyboard only mouse works . below is the partial part of the code.
VBA Code:
Sub send_selection_as_Attachemnt()
Dim copyrange As Range
Dim destinationrange As Range
Dim wk As Workbook
Dim button_clicked As VbMsgBoxResult
Dim i As Integer
create_my_folder_if_not_at_desktop
On Error GoTo endsub1:
'ThisWorkbook.Activate
Set copyrange = Application.InputBox("choose cells which u want to copy", Type:=8)
On Error GoTo 0
Set wk = Workbooks.Add
Set destinationrange = Range("A1")
On Error GoTo endsub3:
copyrange.Copy destinationrange
On Error GoTo 0