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

• #2979 Lokids addikt Lokids #2975

  Új Válasz 2017-12-21 11:34:44 #2979

  Ú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

  

  Lokids

  addikt

  válasz Lokids #2975 üzenetére

  Már nem tudom szerkeszteni.

  Ez nem jó.
  Set WBRange = Workbooks(OutputKAT_F_Name).Worksheets(s_wsName).Range("A2:" & HeaderKAT_Last_Col & s_OutRow)


Workbooks(OutputKAT_F_Name).Worksheets(s_wsName).Sort.SortFields.Add Key:=Range(WBRange & "[" & "Projekt neve" & "]"), SortOn:= _
xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

  Ez meg miért jó?
  Range("A2").Select
ActiveWorkbook.Worksheets("VIGKAT").Sort.SortFields.Add Key:=Range("A2"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

• #2977 sztanozs veterán Lokids #2975

  Új Válasz 2017-12-21 11:18:35 #2977

  Ú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

  

  sztanozs

  veterán

  válasz Lokids #2975 üzenetére

  Megírod ide, hogy szeretnéd töröltetni: link

  Biztos, hogy a range-et jól veszi fel ez a sor:
  Set WBRange = Workbooks(OutputKAT_F_Name).Worksheets(s_wsName).Range("A2:" & HeaderKAT_Last_Col & s_OutRow)
  Nézz rá debuggerben.

• #2976 vilag tag Lokids #2975

  Új Válasz 2017-12-21 11:17:00 #2976

  Ú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

  

  vilag

  tag

  válasz Lokids #2975 üzenetére

  Szerintem sehogyan.

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