???
Works for me.
Daniel

-----Message d'origine-----
De : excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] De
la part de Bob
Envoyé : lundi 2 mai 2011 22:36
À : MS EXCEL AND VBA MACROS
Objet : $$Excel-Macros$$ Copy/Paste Code

For the life of me I can not figure out why this code will work fine if more
than 2 or more rows are Copied and Pasted. But if only one row is copied and
pasted It will not work. Any help at all, please! Thanks in advance!
The code stops at ActiveSheet.Paste

Private Sub CommandButton2_Click()

'Copy contents from Worksheet2 Columns A & B Sheets("Worksheet2").Select
Range("B3").End(xlDown).Select
Temp1 = ActiveCell.Address
Range("A3" & ":" & Temp1).Select
Selection.Copy
'Paste contents on next available blank row on Part Numbers Surface Area in
Columns A & B Sheets("Part Numbers Surface Area").Select Sheets("Part
Numbers Surface Area").Range("A2").End(xlDown).Offset(1).Select
ActiveSheet.Paste
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
Application.CutCopyMode = False

End Sub

--
----------------------------------------------------------------------------
------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip 2. Join our LinkedIN group @
http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and
Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel

Reply via email to