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

• #50478 Pá addikt

  Új Válasz 2023-02-14 13:15:39 #50478

  Ú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

  

  Pá

  addikt

  Nem tudom működésre bírni az alábbit.
  Sub DYN_UNI()
Dim r As String
Dim lstrw As Integer
lstrw = 35
r = "Input!D2:D" & lstrw
    
    Sheet5.Range("J39").Formula2 = "=UNIQUE(r)"
    
End Sub

  Azt szeretném elérni vele, hogy betegye a "=UNIQUE(Input!D2 : D35)" formulát.
  Nyilván aztán a 35-öt szeretném benne dinamikusan változtatni.

  De ebből valamiért mindig UNIQUE(39:39) lesz....
  Már több oldalról végigpróbálgattam, de sehogy sem akarja.

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