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

• #16101 baderoli tag Delila_1 #16100

  Új Válasz 2013-01-11 09:14:31 #16101

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  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