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

• #16915 detroitrw addikt Mutt #16914

  Új Válasz 2013-02-25 08:39:55 #16915

  Ú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

  

  detroitrw

  addikt

  válasz Mutt #16914 üzenetére

  Szia!

  kipróbáltam, de hibát lök a futtatáskor

  egy ilyennel oldottam meg:
  A = ActiveCell.Row
  B = ActiveCell.Column
  
  ActiveSheet.Cells(A + 1, B + 0).Select

  mivel ez csak 1 ciklus így adtam neki egy ciklus mennyiséget:

  Private Sub xxxxx
  For x = 1 To 1000
  
  ......
  
  Next x
  End Sub

  nem olyan elegáns de megoldja a gondom

  Köszi

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