copiare dati di una colonna



  • copiare dati di una colonna di RickyZ (utente non iscritto) data: 20/11/2016 19:48:32

    Ciao a tutti
    premetto che sono parecchio a "digiuno" di VBA
    Avrei bisogno di copiare i dati (solo valori) in una colonna (es. B14-Bn) di un foglio chiamato "Report" in una colonna (F11-Fn) di un'altro foglio "Master" in cui i dati devono però essere incolonnati sfalsati di una riga l'uno dall'altro.
    es:
    B14 -> F11
    B15 -> F13
    Sottolineo che ogni cella della colonna F11-Fn del foglio "Master" è composta di due righe che:
    sopra (6 celle unite) accolgono il dato da "Report"
    sotto (6 celle separate) contengono formule e formattazioni condizionali
    Spero di essere stato chiaro e ringrazio in anticipo chi volesse ed abbia voglia di aiutarmi.


  • di patel data: 21/11/2016 09:19:01

    allega un file di esempio con dati e risultato desiderato


  • di RickyZ (utente non iscritto) data: 21/11/2016 21:26:47

    Ciao e Grazie per l'interessamento
    Ho allegato il file evidenziando con i colori le colonne (ho colto l'occasione ......) interessate
    Spero sia chiaro.


  • di patel data: 22/11/2016 08:55:27

    prova questa
     
    Sub a()
    dr = 11
    With Sheets("Report")
      For r = 14 To 41
        Sheets("Master").Cells(dr, "F") = .Cells(r, "B").Value
        dr = dr + 2
      Next
    End With
    End Sub


  • di RickyZ (utente non iscritto) data: 22/11/2016 20:41:35

    Grazie Patel

    sei un GRANDE!!!
    Funziona bene ed ora mi basterà modificare alcuni dati per ottenere lo stesso risultato con le altre colonne.


  • di RickyZ (utente non iscritto) data: 09/12/2016 13:19:26

    Ciao a tutti
    Allora……
    Quando e se ne avete voglia e tempo…..
    Il file che ho postato fin’ora l’ho sviluppato così.
    A cosa serve:
    copiare i dati dai fogli Report (enne fogli -> max 8) nel foglio Master
    Ho deciso che i dati:
    • posizione (colonna A) - testo
    • quota (colonna B) – numero (valore assoluto -> senza segno)
    • LSL (colonna C) – numero (valore assoluto -> senza segno)
    • USL (colonna D) – numero (valore assoluto -> senza segno)
    del foglio Master, vengano prelevati dal foglio Report (non numerato) -> Bottone di comando “Copia nominali e toll.” e casella di testo in cui decido il n° di righe da copiare (da 14 a n righe)

    mentre i dati:
    “measures” delle colonne F; M; T; AA; AH; AO; AV e BC del foglio Master vengano prelevati dai fogli Report o Reportn (numerati) in base alle indicazioni che scelgo nelle due ComboBox con il Bottone di comando “Copia Rilievi”

    I limiti dovuti alle mie conoscenze:
    1. il numero esagerato che ho di righe* (dalla 11 in poi) nel foglio Master -> a me piacerebbe che si dimensionassero (partendo da una decina di righe preimpostate) in base al n° di righe dei fogli dai quali prelevo i dati (nel file allegato, per esempio, i fogli Report contengono dati fino alla riga 41)
    2. dover inserire manualmente il n° di righe dei fogli Report di provenienza

    nota*
    ogni riga del foglio Master in cui voglio inserire i dati a partire dalla 11, è doppia (due righe) e le celle delle colonne “measures” (F; M; T; AA; AH; AO; AV e BC) composte da due righe (quella sotto contiene formule e formattazioni condizionali) e sei colonne.

    Se riuscitea far qualcosa Grazie
    RickyZ