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

• #12882 poffsoft veterán Delila_1 #12877

  Új Válasz 2012-02-11 20:40:09 #12882

  Ú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

  

  poffsoft

  veterán

  válasz Delila_1 #12877 üzenetére

  Szerintem a 'Számolás'!F2:F9 range-t akarja a "Cégek" következő üres sorába transzponálni, így a kódod picit változik:

  Sub masol()
  Sheets.("Számol").Range("F1:F9").Copy
  
  Sheets("Cégek").Activate
  usor = ActiveSheet.UsedRange.Rows.Count
  uoszlop = ActiveSheet.UsedRange.Columns.Count
  ' szerintem a használt oszlopok száma nem kell...
  Cells(usor + 1, 1).Activate
  Selection.PasteSpecial Paste:=xlValues , Transpose:=True
  End Sub

  Ha jól értettem....
  Mondjuk az a range("A65536").end().offset()-et nem egészen értem...
  Vagyis értem, de bonyolultnak tűnik.

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