| | Post: 17 | Registrato il: 11/10/2016
| Città: GENOVA | Età: 36 | Utente Junior | Microsoft Office 2007 | | OFFLINE | |
|
  17/11/2016 10:10 | |
Salve a tutti, avrei bisogno di una macro che mi faccia cambiare il nome del foglio selezione inserendo il nome dopo l'attivazione della macro...cioè in sintesi mi servirebbe una macro che mi evitasse di usare il mouse per dire rinomina (modificare) questo foglio di lavoro.
Grazie mille anticipatamente. [Modificato da FrancescoCacciola 17/11/2016 10:16] |
|
| | Post: 963 | Registrato il: 06/04/2013
| Utente Senior | 2010 | | OFFLINE |
|
| 17/11/2016 11:05 | |
FrancescoCacciola, 17/11/2016 10.10:
Salve a tutti, avrei bisogno di una macro che mi faccia cambiare il nome del foglio selezione inserendo il nome dopo l'attivazione della macro...cioè in sintesi mi servirebbe una macro che mi evitasse di usare il mouse per dire rinomina (modificare) questo foglio di lavoro.
Grazie mille anticipatamente.
"A voce" non è possibile ![[SM=x423026]](http://www.erismag.it/Servizio/ForumExcel/Smiles/Faccina_0006.gif)
devi comunque cliccare su un pulsante (o fare doppio click su una cella da stabilire) e far apparire una inputBox che ti chiede quale nome vuoi assegnare al foglio con tanto di controlli su nomi esistenti o caratteri errati....che convenienza ne hai?
Oppure hai già una macro alla fine della quale vuoi cambiare il nome foglio con ???
...o non ho capito?
saluti
[Modificato da dodo47 17/11/2016 11:07] Domenico
Win 10 - Excel 2016 |
| | Post: 17 | Registrato il: 11/10/2016
| Città: GENOVA | Età: 36 | Utente Junior | Microsoft Office 2007 | | OFFLINE | |
|
| 17/11/2016 12:15 | |
Quindi con InputBox si può fare???
Mi va benissimo...perchè devo rinominare le varie pagine in quel momento specifico quindi non posso riferirmi alle celle.
In sintesi vorrei fare una macro che mi eviti di usare il mouse, ma solo la tastiera per rinominare il foglio. |
| | Post: 2.415 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Veteran | Excel 365 | | OFFLINE |
|
| 17/11/2016 12:26 | |
Ciao Francesco ed un caro saluto a Domenico.
Potresti provare con una macro di questo tipo (che puoi associare a tasti per la scelta rapida) che ti consente di inserire un nuovo nome foglio e lo attribuisce al foglio attivo.
vb Sub NomeFoglio()
Dim nomefgl As String
On Error Resume Next
nomefgl = InputBox("Inserire nuovo nome del foglio")
ActiveSheet.Name = nomefgl
End Sub[Modificato da alfrimpa 17/11/2016 12:30]
Alfredo |
| | Post: 18 | Registrato il: 11/10/2016
| Città: GENOVA | Età: 36 | Utente Junior | Microsoft Office 2007 | | OFFLINE | |
|
| 17/11/2016 13:02 | |
Fantastico hai capito cosa intendevo. Una piccola curiosità è possibile avere nella nuova finestra il nome attuale da modificare o è necessario riscriverlo completamente? Perchè la WRITEBOX appare vuotà quindi è necessario riscriverlo da capo, è possibile invece avere in questa il nome attuale della pagina?
Grazie mille Alfredo :)
|
| | Post: 2.416 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Veteran | Excel 365 | | OFFLINE |
|
| 17/11/2016 14:12 | |
Ciao Francesco
Allora modifica la precedente macro così:
vb Sub NomeFoglio()
Dim nomefgl As String
On Error Resume Next
nomefgl = InputBox("Inserire nuovo nome", "Modifica Nome", ActiveSheet.Name)
ActiveSheet.Name = nomefgl
End Sub
Alfredo |
| | Post: 19 | Registrato il: 11/10/2016
| Città: GENOVA | Età: 36 | Utente Junior | Microsoft Office 2007 | | OFFLINE | |
|
| 17/11/2016 14:46 | |
fUNZIONA ALLA GRANDE, GRAZIE :)
|
|
|
|
|