één tabblad verzenden

[moensk]

Ik heb een excel met diverse tabbladen
nu wil ik 1 tabblad verzenden via mail als excel
dit kan natuurlijk door het tabblad te kopieeren naar een nieuwe excel en dan te verzenden
maar ik wil dit automatiseren is hier een script voor ?
heb dit geprobeerd via macro
CTRL A - CTRL C en in nieuwe excel CTRL V

probleem : als ik dit handmatig doe dan werkt het
als ik hetzelfde laat uitvoeren door de macro dan neemt hij een foto en plakt deze in de nieuwe excel (zie bijlage)

hieronder macro

Sub test2()
    Cells.Select
    Selection.Copy
    Workbooks.Add
    Range("A1").Select
    ActiveSheet.Buttons.Add(369.75, 2.25, 156, 36.75).Select
    ActiveSheet.Buttons.Add(254.25, 2.25, 94.5, 36).Select
    ActiveSheet.Paste
    Range("B4").Select
End Sub

 

[jkpieterse]

http://rondebruin.nl/win/section1.htm

 

[moensk]

thanks, gevonden op de site
werkt super