Keskustelu: Ohjelmointikysymykset: VBA: Excel Macro

Olen vasta-alkaja näissä koodaushommissa. Jostain syystä en vain saa onnistumaan Exeliin sellaista makroja, joka valitsi tietystä sarakkeesta, tietyltä väliltä luvut, jotka ovat suurempia kuin 0.09 ja vaikka maalaisi ne, onko tällaisen makron tekeminen edes käytännössä mahdollista? Onnistuin jotain perusmakroja tekemään mutta, tällaista en.

On se mahdollista.

Tässä esimerkki joka tekee haluamasi aktiivisen lehden soluille A1:A20

Sub Tiivitaavi()
    Dim i As Long
    Dim r As Range
    Dim found As Boolean
    Dim cell As Range

    For i = 1 To 20
        Set cell = ActiveSheet.Cells(i, 1)
        If cell.Value > 0.09 Then
            If found Then
                Set r = Union(r, cell)
            Else
                Set r = cell
                found = True
            End If
        End If
    Next
    If found Then r.Select
End Sub

Ok. No hyvä tietää. Täytyy siis edelleen jatkaa kokeiluja. Ilmeisesti ei kuitenkaan tule if...then komennolla, koska en ole onnistunut.

Pelkällä if-then -rakenteella ei varsinaisesti voi tehdä yhtään mitään, vaan aina täytyy olla jokin ehdollisesti suoritettava komentokin joka hoitaa varsinaisen tekemisen.