Keresés

Új hozzászólás Aktív témák

  • baderoli

    tag

    válasz Delila_1 #16100 üzenetére

    Köszönöm! Ha két különböző területet szeretnék megjelölni egy makrón belül,akkor elég csak megismételnem a lezáráson belül? Pl:

    Sub X_ek()
    Dim sorF%, sorA%, oszlopE%, oszlopU%, i%, sor%, oszlop%

    sorF% = 42: sorA% = 71: oszlopE% = 4: oszlopU% = 8
    For i = 1 To 2
    sor% = Rnd() * (sorF% - sorA%) + sorA%
    oszlop% = Rnd() * (oszlopU% - oszlopE%) + oszlopE%
    Cells(sor%, oszlop%) = "X"
    Next
    Dim sorF%, sorA%, oszlopE%, oszlopU%, i%, sor%, oszlop%

    sorF% = 42: sorA% = 71: oszlopE% = 10: oszlopU% = 12
    For i = 1 To 2
    sor% = Rnd() * (sorF% - sorA%) + sorA%
    oszlop% = Rnd() * (oszlopU% - oszlopE%) + oszlopE%
    Cells(sor%, oszlop%) = "X"
    Next
    End Sub

    Ha jó a logikám akkor a D42:H71 és J42:L71 területre írja be. De szerintem a Dim sor nem is kell kétszer és talán a Next sem. Amúgy ez milyen nyelven van ? Visual Basic?

Új hozzászólás Aktív témák