hello
i found this code in a john walkenbach book.
i am trying to use a refedit to copy a selection from a cell to another.
[VBA]
Dim Msg As String
Msg = "Source = " & Me.RefEdit1.Value & vbNewLine
Selection.Copy
Msg = Msg & "Destination = " & Me.RefEdit2.Value & vbNewLine
ActiveSheet.Paste
Application.CutCopyMode = False
MsgBox Msg
[/VBA]
what wrong with this code?
thanks
moshe
Hello Moshe,
This must only be part of the code....the "Me.Refedit1.value line tells me it probably belongs to a form. Can you post the rest of the code or give some more information?
Steve
"Nearly all men can stand adversity, but if you want to test a man's character, give him power."
-Abraham Lincoln
here is the entire file.
Try
[VBA]
Private Sub CommandButton2_Click()
Dim Msg As String
Msg = "Source = " & Me.RefEdit1.Value & vbNewLine
Msg = Msg & "Destination = " & Me.RefEdit2.Value & vbNewLine
MsgBox Msg
Range(Me.RefEdit1.Value).Copy Range(Me.RefEdit2.Value)
Unload Me
End Sub
[/VBA]
MVP (Excel 2008-2010)
Post a workbook with sample data and layout if you want a quicker solution.
To help indent your macros try Smart Indent
Please remember to mark threads 'Solved'
Posting Permissions
Reply With Quote
