È soltanto un Pokémon con le armi o è un qualcosa di più? Vieni a parlarne su Award & Oscar!

Excel Forum Per condividere esperienze su Microsoft Excel

Inserire righe con del testo alternato

  • Messaggi
  • OFFLINE
    Ryude19
    Post: 1
    Registrato il: 11/08/2017
    Città: MILANO
    Età: 34
    Utente Junior
    Ultima
    00 11/08/2017 11:24
    Buongiorno a tutti. Espongo il mio problema...
    Io ho una lista molto lunga (per semplificare userò dei numeri per essere più chiaro).
    Il mio file è composto cosi:
    1, 1, 1, 1
    2, 2, 2, 2
    3, 3, 3, 3
    4, 4, 4, 4
    5, 5, 5, 5
    Naturalmente è molto più corposo sia in colonne che righe (per chi se ne intente è un tracciato di prodotti magento).
    Devo inserire tra le righe una riga con del contenuto e quindi avere un risultato simile a questo:
    1,1,1,1
    , ,11,
    2,2,2,2
    , ,22,
    3,3,3,3
    , ,33,
    ecc
    (lo spazio vuoto è voluto)
    Il contenuto di 11,22,33 è preso da una colonna composta cosi
    11
    22
    33
    Come faccio ad inserire quest'ultima colonna come spiegato? Grazie
  • OFFLINE
    dodo47
    Post: 1.536
    Registrato il: 06/04/2013
    Utente Veteran
    2010
    00 11/08/2017 12:15
    ciao
    si capisce ben poco....sottoponi un esempio di quello che hai e del risultato voluto (anche scritto a mano), integrando con una spiegazione dettagliata.

    saluti


    Domenico
    Win 10 - Excel 2016
  • OFFLINE
    Ryude19
    Post: 1
    Registrato il: 11/08/2017
    Città: MILANO
    Età: 34
    Utente Junior
    Ultima
    00 11/08/2017 14:09
    Ho risolto questa cosa alla vecchia maniera. 1000 righe copiate e incollate a mano. Ora però sinceramente non vorrei ripassare per ogni riga e incollare il contenuto. In pratica ho due colonne:
    Colonna1
    testo
    vuoto
    testo
    vuoto
    testo
    vuoto

    Colonna2
    testo1
    testo1
    testo1
    testo1
    testo1

    Colonna1 con risultato finale
    testo
    testo1
    testo
    testo1
    testo
    testo1
    ecc

    In pratica vorrei che il testo della colonna2 vada in automatico nella colonna1 nello spazio vuote, senza però intaccare il testo già presente.
    E' possibile farlo? Grazie
    [Modificato da Ryude19 11/08/2017 14:15]
  • OFFLINE
    dodo47
    Post: 1.537
    Registrato il: 06/04/2013
    Utente Veteran
    2010
    00 11/08/2017 16:34
    ...
    ur = Range("b" & Rows.Count).End(xlUp).Row
    k = 2
    For i = 2 To ur
        Cells(k, 1) = Cells(i, 2)
        k = k + 2
    Next
    ...



    Domenico
    Win 10 - Excel 2016