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
