Re: Excel segítség!!!

Édes Péter epeter at epeter.hu
2010. Jan. 29., P, 08:46:39 CET 

2010/1/27 Zsolt Nagy <nagyzsolt80 at 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 -----
epeter at epeter.hu
http://www.epeter.hu
Skype: edes.peter
--------- következő rész ---------
Egy csatolt HTML állomány át lett konvertálva...
URL: http://lista.sulinet.hu/pipermail/techinfo/attachments/20100129/5f5c8bdf/attachment.html

További információk a(z) Techinfo levelezőlistáról