Risultati da 1 a 12 di 12

Discussione: Macro Archivia dati dal video excel in pillole 56



  1. #1
    L'avatar di francosisco
    Clicca e Apri
    Data Registrazione
    Oct 2016
    Località
    Roma
    Età
    31
    Messaggi
    7
    Versione Office
    2007
    Mi Piace ricevuti
    0
    Mi Piace dati
    0

    Macro Archivia dati dal video excel in pillole 56

    Buongiorno a tutti ragazzi,
    mi dispiace tanto inizare la mia esperienza all'interno del forum con una richiesta di aiuto...
    Ma ci sto sbattendo veramente la testa da venerdì scorso senza soluzioni.
    Dopo aver visto il video di Gerardo descritto nel titolo ho provato anche io a replicare un file con una piccola variazione e mi spiego:
    Il tab input personale è diposto su in orizzontale e permette la selezione di alcuni parametri fino alla colonna E, mentre dalla colonna F alla R (gennaio dicembre) è imputazione.
    Il problema è che dopo aver registrato la macro (con il registratore) e l'ultilizzo dei riferimenti relativi ,come mostrava Gerardo, non riesco ad incollare in maniera corretta nel tab output...
    Potreste aiutari correggendomi il codice VBA direttamente sul mio file che allego?
    Ve ne sarei grato.
    File Allegati File Allegati
    Ultima modifica fatta da:ges; 17/10/16 alle 16:40

  2. #2

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    52
    Messaggi
    3700
    Versione Office
    2011/2016MAC
    Mi Piace ricevuti
    1104
    Mi Piace dati
    653

    Re: Macro Archivia dati dal video excel in pillole 56

    Ciao Franco,
    ci spieghi esattamente cosa vuoi fare?
    Hai 6 fogli, quali dati vuoi copiare e da quale a quale foglio.
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  3. #3
    L'avatar di francosisco
    Clicca e Apri
    Data Registrazione
    Oct 2016
    Località
    Roma
    Età
    31
    Messaggi
    7
    Versione Office
    2007
    Mi Piace ricevuti
    0
    Mi Piace dati
    0

    Re: Macro Archivia dati dal video excel in pillole 56

    Ciao e scusami per essere stato poco chiaro,
    la macro deve copiare da input ed incollare (valori) in output

  4. #4

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    52
    Messaggi
    3700
    Versione Office
    2011/2016MAC
    Mi Piace ricevuti
    1104
    Mi Piace dati
    653

    Re: Macro Archivia dati dal video excel in pillole 56

    Il foglio è un pò incasinato, ma forse vorresti così?
    Codice: 
       Sub copia()Dim sh1 As Worksheet, sh2 As Worksheet, uRow1 As Long, uRow2 As Long
        Set sh1 = Worksheets("Input personale")
        Set sh2 = Worksheets("Output")
            uRow1 = sh1.Cells(Rows.Count, 1).End(xlUp).Row
            uRow2 = sh2.Cells(Rows.Count, 1).End(xlUp).Row + 1
                sh1.Range(Cells(uRow1, 1), Cells(uRow1, 17)).Copy Destination:=sh2.Cells(uRow2, 1)
         Set sh1 = Nothing
         Set sh2 = Nothing
    End Sub
    File Allegati File Allegati
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  5. #5
    L'avatar di francosisco
    Clicca e Apri
    Data Registrazione
    Oct 2016
    Località
    Roma
    Età
    31
    Messaggi
    7
    Versione Office
    2007
    Mi Piace ricevuti
    0
    Mi Piace dati
    0

    Re: Macro Archivia dati dal video excel in pillole 56

    Ti ringrazio tantissimo...
    MI occorerrebbe l'incolla speciale (solo valori) e potresti aggiunermi il clear dei dati sul file input per consetire una nuova imputazione?

  6. #6

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    52
    Messaggi
    3700
    Versione Office
    2011/2016MAC
    Mi Piace ricevuti
    1104
    Mi Piace dati
    653

    Re: Macro Archivia dati dal video excel in pillole 56

    Per il clean, inserisci nel codice la riga in rosso:
    Codice: 
      Sub copia()Dim sh1 As Worksheet, sh2 As Worksheet, uRow1 As Long, uRow2 As Long
        Set sh1 = Worksheets("Input personale")
        Set sh2 = Worksheets("Output")
            uRow1 = sh1.Cells(Rows.Count, 1).End(xlUp).Row
            uRow2 = sh2.Cells(Rows.Count, 1).End(xlUp).Row + 1
                sh1.Range(Cells(uRow1, 1), Cells(uRow1, 17)).Copy Destination:=sh2.Cells(uRow2, 1)
                sh1.Range(Cells(uRow1, 1), Cells(uRow1, 17)) = ""
         Set sh1 = Nothing
         Set sh2 = Nothing
    End Sub
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  7. #7
    L'avatar di francosisco
    Clicca e Apri
    Data Registrazione
    Oct 2016
    Località
    Roma
    Età
    31
    Messaggi
    7
    Versione Office
    2007
    Mi Piace ricevuti
    0
    Mi Piace dati
    0

    Re: Macro Archivia dati dal video excel in pillole 56

    Grazie ancora,
    se non ti rubo ulteriore tempo, mi occorre che nel utput il copia incolla valori...

  8. #8

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    52
    Messaggi
    3700
    Versione Office
    2011/2016MAC
    Mi Piace ricevuti
    1104
    Mi Piace dati
    653

    Re: Macro Archivia dati dal video excel in pillole 56

    Ok,
    sostituisci tutto il codice con questo:
    Codice: 
    Sub copia()
    Dim sh1 As Worksheet, sh2 As Worksheet, uRow1 As Long, uRow2 As Long
        Set sh1 = Worksheets("Input personale")
        Set sh2 = Worksheets("Output")
            uRow1 = sh1.Cells(Rows.Count, 1).End(xlUp).Row
            uRow2 = sh2.Cells(Rows.Count, 1).End(xlUp).Row + 1
                sh1.Range(Cells(uRow1, 1), Cells(uRow1, 17)).Copy
                sh2.Cells(uRow2, 1).PasteSpecial Paste:=xlValues
                sh1.Range(Cells(uRow1, 1), Cells(uRow1, 17)) = ""
                Application.CutCopyMode = False
         Set sh1 = Nothing
         Set sh2 = Nothing
         MsgBox "Dati archiviati"
    End Sub
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  9. #9
    L'avatar di francosisco
    Clicca e Apri
    Data Registrazione
    Oct 2016
    Località
    Roma
    Età
    31
    Messaggi
    7
    Versione Office
    2007
    Mi Piace ricevuti
    0
    Mi Piace dati
    0

    Re: Macro Archivia dati dal video excel in pillole 56

    Guarda ti ringrazio tantissimo.. Devo assolutamente imparare il linguaggio VBA perchè con poche stringhe mi hai risolto un problemone per me..
    Se hai qualche consiglio per me per iniziare sono bene accetti.
    Chiudo il post con risolto?

  10. #10

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    52
    Messaggi
    3700
    Versione Office
    2011/2016MAC
    Mi Piace ricevuti
    1104
    Mi Piace dati
    653

    Re: Macro Archivia dati dal video excel in pillole 56

    Citazione Originariamente Scritto da francosisco Visualizza Messaggio
    ...
    Chiudo il post con risolto?
    Chiudo io.
    Grazie del riscontro.
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  11. #11
    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    63
    Messaggi
    2026
    Versione Office
    2007 - 2013
    Mi Piace ricevuti
    256
    Mi Piace dati
    39

    Re: Macro Archivia dati dal video excel in pillole 56

    Citazione Originariamente Scritto da francosisco Visualizza Messaggio
    Se hai qualche consiglio per me per iniziare sono bene accetti.
    Puoi cominciare da qui

    http://www.forumexcel.it/forum/51-im...l-vba-di-excel
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"
    Cit. Berna11: "Se ti piace la risposta di qualcuno, oltre a ringraziarlo, puoi cliccare su "Mi Piace" in basso a sinistra del loro messaggio."

  12. #12
    L'avatar di francosisco
    Clicca e Apri
    Data Registrazione
    Oct 2016
    Località
    Roma
    Età
    31
    Messaggi
    7
    Versione Office
    2007
    Mi Piace ricevuti
    0
    Mi Piace dati
    0

    Re: Macro Archivia dati dal video excel in pillole 56

    Grazieee

Discussioni Simili

  1. Risposte: 5
    Ultimo Messaggio: 20/05/16, 10:52
  2. Modificare Macro Archivia per includere dei Range diversi
    Di Lety88 nel forum Domande su Excel VBA e MACRO
    Risposte: 3
    Ultimo Messaggio: 28/04/16, 08:11
  3. File allegati visti su YouTube "Excel in Pillole"
    Di Gerardo Zuccalà nel forum Link Utili
    Risposte: 0
    Ultimo Messaggio: 23/04/16, 16:36
  4. Risposte: 23
    Ultimo Messaggio: 23/02/16, 11:16
  5. Excel in pillole EP17
    Di Baloon_50 nel forum Domande su Excel in generale
    Risposte: 17
    Ultimo Messaggio: 02/08/15, 22:34

Tag per Questa Discussione

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
  •