Sviluppare funzionalita su Microsoft Office con VBA selezione, copia, incolla celle alterne ed eliminazione righe alterne

LoginRegistrati
Stai vedendo 4 articoli - dal 1 a 4 (di 4 totali)
  • Autore
    Articoli
  • #30373 Risposta

    Giulia.S
    Partecipante

      Salve a tutti,

      Sto iniziando a scoprire ora il mondo delle macro, e avrei bisogno di una macro che mi selezionasse le celle alterne (es. celle nelle righe dispari) di una determinata colonna, copiasse il contenuto, e me lo incollasse nelle celle vuote delle righe pari. E infine che mi eliminasse le righe da cui è stato già copiato il contenuto.
      Ho provato a farlo registrando la macro con un numero esiguo di dati, ma poi non so come dirgli di farlo finche non trova una  riga vuota.
      Ho allegato delle immagini esempio.

      Sarebbe possibile?
      Grazie a tutti

      Allegati:
      You must be logged in to view attached files.
      #30381 Risposta
      rollis13
      rollis13
      Partecipante
        3 pts

        Facendo riferimento agli esempi e non a quello che hai scritto ti propongo questa macro:

        `Option Explicit
        Sub SpostaCellePari()
            Dim ur     As Long
            Dim riga   As Long
            ur = Range("H" & Rows.Count).End(xlUp).Row    'calcola l'ultima riga utilizzata
            If (ur Mod 2) = 0 Then ur = ur - 1            'serve solo nel caso la colonna finisca con una riga pari
            For riga = 2 To ur
                If (riga Mod 2) = 0 Then                  'controllo se la riga è pari o dispari
                    Range("H" & riga).Cut Range("I" & riga + 1)
                End If
            Next
        End Sub`
        #30389 Risposta

        Giulia.S
        Partecipante

          grazie mille!

          #30390 Risposta
          rollis13
          rollis13
          Partecipante
            3 pts

            Grazie del riscontro positivo .

          LoginRegistrati
          Stai vedendo 4 articoli - dal 1 a 4 (di 4 totali)
          Rispondi a: selezione, copia, incolla celle alterne ed eliminazione righe alterne
          Gli allegati sono permessi solo ad utenti REGISTRATI
          Le tue informazioni:



          vecchio frac - 2750 risposte

          patel
          patel - 1073 risposte

          albatros54
          albatros54 - 1058 risposte

          Marius44
          Marius44 - 970 risposte

          Luca73
          Luca73 - 766 risposte