Vapaa kuvaus

Aloituksia

10

Kommenttia

14

  1. Unohda toi äsköinen, siis siinä taulussa jossa kaaviot siirtyy niin tekee tämän makron

    Sheets("STEP4").Select

    Range("A9").Select

    For d = Range("A39:A237").Cells.Count To 1 Step -1
    If Len(Range("A39:A237").Cells(d)) = 0 Then Range("A39:A237").Cells(d).EntireRow.Delete
    Next d
  2. Koskas lähdössä?