2010/1/27 Zsolt Nagy <nagyzsol...@gmail.com> > Sziasztok! > > Hogyan lehet azt megcsinálni excel-ben: > > egy adott munkalapot átmásoljon az eredeti munkalap megtartásával > gombnyomással, hogy én adhassam meg a nevét a másolatnak. > > > Egy lehetséges megoldása:
Sub masol() ' ' Az aktív munkalap másolása az elejére ' Dim nev As String nev = InputBox("Kérem az új munkalap nevét!", "Név megadása", "Névtelen") If nev = "" Then nev = "Nevtelen" End If ActiveSheet.Copy Before:=Sheets(1) Sheets(1).Name = nev End Sub üdv: Péter -- ----- Édes Péter ----- epe...@epeter.hu http://www.epeter.hu Skype: edes.peter
_______________________________________________ Techinfo mailing list Techinfo@lista.sulinet.hu Fel- és leiratkozás: http://lista.sulinet.hu/mailman/listinfo/techinfo Illemtan: http://www.1let.hu/illemtan.html Ügyfélszolgálat FAQ: http://www.kozhalo2.hu/Faq.aspx