You are here:---Rispondi a: evitare salti di foglio
Rispondi a: evitare salti di foglio 2019-02-07T11:22:56+00:00

Home Forum Domande su Excel VBA e MACRO evitare salti di foglio Rispondi a: evitare salti di foglio

teto21162
Partecipante
    Post totali: 69

    Sub COPIA_appiuntamento_in_calendario_3()

     

    Windows(“APPUNTAMENTI.xls”).Activate

     

    Sheets(“sms”).Activate

    With Sheets(“sms”)

    .Range(“e23”).PasteSpecial Paste:=xlValues ‘ INCOLLA nome

    End With

     

    Sheets(“sms”).Activate

    With Sheets(“sms”)

    .Range(“A2”).Copy ‘ copia data

    End With

    With Sheets(“sms”)

    .Range(“E2”).PasteSpecial Paste:=xlValues ‘ INCOLLA data

    End With

     

     

    Application.CutCopyMode = False

    End Sub

     

    Utilizzando il sito, accetti l'utilizzo dei cookie da parte nostra. maggiori informazioni

    Questo sito utilizza i cookie per fornire la migliore esperienza di navigazione possibile. Continuando a utilizzare questo sito senza modificare le impostazioni dei cookie o cliccando su "Accetta" permetti il loro utilizzo.

    Chiudi