Risultati da 1 a 6 di 6

Discussione: Macro per rinominare una cartella appena duplicata



  1. #1
    L'avatar di Gambadilegno
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Occhiobello
    Età
    47
    Messaggi
    3
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    0

    Macro per rinominare una cartella appena duplicata

    Un saluto a tutti,

    ho creato una macro che mi permette di duplicare un foglio di lavoro, vorrei sapere (cortesemente) cosa debbo fare per avere la possibilità (magari tramite InputBox), di chiedermi il nuovo nome da dare alla nuova cartella appena creata.

    Spero di essermi spiegato, in attesa di indicazioni, ringrazio e saluto.

  2. #2

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6811
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165
    Ciao

    Così scritta su due piedi, da eseguire sul foglio attivo.

    Codice: 
    Sub NominaFoglio()
    Dim nomefoglio as String
    nomefoglio = InputBox("Inserire il nome del Foglio")
    ActiveSheet.Name = nomefoglio
    End Sub
    Alfredo

  3. #3
    L'avatar di Gambadilegno
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Occhiobello
    Età
    47
    Messaggi
    3
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    0
    Buonasera Alfredo e grazie mille per la veloce risposta, appena riesco provo ad inserire quanto indicato e poi ti faccio sapere.

    Grazie infinite e buona Pasqua a tutti!

  4. #4

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2810
    Versione Office
    Excel 2013
    Likes ricevuti
    1021
    Likes dati
    979
    Forse @Gambadilegno intendeva:
    Codice: 
    ThisWorkbook.SaveAs nomefoglio
    (magari mi sbaglio)

  5. #5

    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    64
    Messaggi
    6811
    Versione Office
    2013
    Likes ricevuti
    720
    Likes dati
    165
    Rubik hai perfettamente ragione.

    Quindi, nella mia macro, ActiveSheet.Name va sostituito con ThisWorkbook.SaveAs

    Mi scuso per aver risposto frettolosamente.

    Alfredo

  6. #6
    L'avatar di Gambadilegno
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Occhiobello
    Età
    47
    Messaggi
    3
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    0
    Ragazzi, grazie mille...

Discussioni Simili

  1. Inserire una macro in una cartella di lavoro
    Di alfrimpa nel forum Domande su Excel VBA e MACRO
    Risposte: 1
    Ultimo Messaggio: 05/11/17, 16:30
  2. [Risolto] Macro esporta foglio in una nuova cartella come xps
    Di Antonio1008 nel forum Domande su Excel VBA e MACRO
    Risposte: 3
    Ultimo Messaggio: 13/12/16, 10:57
  3. Risposte: 23
    Ultimo Messaggio: 01/11/16, 17:22
  4. Codice VBA per bloccare le righe appena compilate
    Di ProgrammD69 nel forum Domande su Excel VBA e MACRO
    Risposte: 9
    Ultimo Messaggio: 28/07/16, 22:42
  5. [Risolto] Funzione se + condizioni
    Di GIMMI nel forum Domande su Excel in generale
    Risposte: 6
    Ultimo Messaggio: 07/02/16, 20:23

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •