Stellar Blade Un'esclusiva PS5 che sta facendo discutere per l'eccessiva bellezza della protagonista. Vieni a parlarne su Award & Oscar!

Excel Forum Per condividere esperienze su Microsoft Excel

Macro

  • Messaggi
  • OFFLINE
    bartus6
    Post: 7
    Registrato il: 18/06/2008
    Città: ALBA
    Età: 57
    Utente Junior
    excel 2016
    00 23/10/2023 21:40
    Salve a tutti è da un po che mancavo , volevo chiedervi un piccolo suggerimento
    ho creato il file che vi allego , ma vorrei che il salva e chiudi mi chiuda anche excel
    grazie a chi mi rispondera
  • OFFLINE
    L2018
    Post: 832
    Registrato il: 02/04/2018
    Città: PESCARA
    Età: 75
    Utente Senior
    EXCEL 2016 - SPREAD32
    00 23/10/2023 22:33
    ciao
    non sono un genio ma sinceramente non capisco come debba funzionare il tuo file, macro non xlsm, password, errori, boh

    allora fai da te

    alla fine della macro, appena prima di end sub ci scrivi

    Application.quit

    Leo

    forse ho capito male, cioè forse non hai macro nel file, ma allora temo che solo per usare un tale comando ci voglia il VBA
    [Modificato da L2018 23/10/2023 22:36]

    LEO
    https://t.me/LordBrum
  • OFFLINE
    L2018
    Post: 833
    Registrato il: 02/04/2018
    Città: PESCARA
    Età: 75
    Utente Senior
    EXCEL 2016 - SPREAD32
    00 23/10/2023 22:49
    ciao, scusa, prima il file non si apriva e dava errore
    ora si apre ma sinceramente non so gestirlo
    passo

    Leo

    LEO
    https://t.me/LordBrum
  • OFFLINE
    federico460
    Post: 3.110
    Registrato il: 10/10/2013
    Città: VICENZA
    Età: 69
    Utente Master
    365
    00 23/10/2023 22:59
    ciao
    Leo
    guarda che ha già il pulsante con
    Application.quit

    il salva e chiudi
    non capisco il problema


    Sub Chiudi()
    Application.Quit
    ActiveWorkbook.Close SaveChanges:=False
    End Sub

    [Modificato da federico460 23/10/2023 23:06]
  • OFFLINE
    L2018
    Post: 834
    Registrato il: 02/04/2018
    Città: PESCARA
    Età: 75
    Utente Senior
    EXCEL 2016 - SPREAD32
    00 23/10/2023 23:13
    Re:
    federico460, 23/10/2023 22:59:

    ciao
    Leo
    guarda che ha già il pulsante con
    Application.quit

    il salva e chiudi
    non capisco il problema


    Sub Chiudi()
    Application.Quit
    ActiveWorkbook.Close SaveChanges:=False
    End Sub




    e infatti me ne sono accorto (quando son riuscito ad aprire il file), provato a usarlo ma non va, neppure spostandolo in ultima posizione
    anche per questo ho fatto passo

    Leo
    [Modificato da L2018 23/10/2023 23:15]

    LEO
    https://t.me/LordBrum
  • OFFLINE
    rollis13
    Post: 1.368
    Registrato il: 16/08/2015
    Città: CORDENONS
    Età: 67
    Utente Veteran
    Excel 2016-32bit Win11
    20 24/10/2023 00:59
    Un saluto a tutti.
    Io opto per questa soluzione per non rischiare di chiudere altri file Excel aperti:
    Option Explicit
    Sub Pulsante199_Click()
        If Application.Workbooks.Count = 1 Then
            ThisWorkbook.Save
            Application.Quit
        Else
            ThisWorkbook.Close SaveChanges:=True
        End If
    End Sub

    ______________________________________________________________
    C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto)
  • 15MediaObject5,0026 2