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

• #41841 Capella senior tag fricc_ #41837

  Új Válasz 2019-09-30 21:51:33 #41841

  Ú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

  

  Capella

  senior tag

  válasz fricc_ #41837 üzenetére

  Nem a formátumra gondoltam, hanem hogy tényleg szám-e, vagy csak úgy néz ki a tartalom.
  Egy felesleges szóköz, vagy tizedesvessző helyett pont, és már nem érték. Igaz az meg feltűnhet alapesetben, hogy merre igazítja a cellában. Vagy ha az ezres elválasztót begépelték, és nem a cellaformátum képzi.
  Persze látatlanban csak egy tipp volt.
  A szövegformátum is meg tudja bolondítani, de ezek szerint az rendben.

• #41836 Capella senior tag fricc_ #41835

  Új Válasz 2019-09-30 12:07:42 #41836

  Ú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

  

  Capella

  senior tag

  válasz fricc_ #41835 üzenetére

  Nem szövegként volt az érték tárolva a hibáknál?
  Az egyesített cella egyébként nem célszerű, különösen, ha azzal számolni is kell.
  Legfeljebb fejléceknél kellene használni.

• #39414 Delila_1 veterán fricc_ #39412

  Új Válasz 2018-10-19 07:47:09 #39414

  Ú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

  

  Delila_1

  veterán

  válasz fricc_ #39412 üzenetére

  Attól, hogy negatív számot tartalmaz az egyik, még össze lehet fűzni két cella értékét.

• #36595 Pakliman tag fricc_ #36592

  Új Válasz 2017-11-17 23:39:59 #36595

  Ú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

  

  Pakliman

  tag

  válasz fricc_ #36592 üzenetére

  D oszlop elrejtve, a Debug.Print n 4-et ad vissza

  Dim ws As Worksheet
Dim n As Integer
Dim cl As Range

For Each ws In ThisWorkbook.Worksheets
n = 0

For Each cl In .Rows(5).Columns
If cl.Hidden Then
n = cl.Column
Exit For
End If
Next cl

Debug.Print ws.Name & "->n=" & n
Next ws

  Erre gondoltál?

  [ Szerkesztve ]

• #36567 Fferi50 Topikgazda fricc_ #36565

  Új Válasz 2017-11-17 06:28:15 #36567

  Ú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

  

  Fferi50

  Topikgazda

  válasz fricc_ #36565 üzenetére

  Szia!

  "i= 1
  n = 0
  For i = 1 To 10
  If Range("i5").EntireColumn.Hidden Then
  n = i"

  A kiemelt sorral az a baj, hogy a Range("i5") az i oszlop 5. celláját nézi meg !!!.
  Ha ciklussal mész akkor a Cells tulajdonságot kell használni:
  If Cells(5,i).EntireColumn.Hidden Then

  Vagy:
  Dim cl As Range
For Each cl in Rows(5).Cells :if cl.EntireColumn.Hidden Then
n=cl.Column :Exit For
  Next
  A kódod következő része pedig a D oszlopot rejtettnek találva az n értékét 2 -re állítja, legyen az bármennyi is az előző rész alapján.

  Üdv.

  Ps. Légy szives, használd a Programkód gombot, ha makrót másolsz be.

  [ Szerkesztve ]

• #36542 Fferi50 Topikgazda fricc_ #36540

  Új Válasz 2017-11-16 14:12:12 #36542

  Ú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

  

  Fferi50

  Topikgazda

  válasz fricc_ #36540 üzenetére

  Szia!

  A cella és (oszlop rejtettségét az EntireColumn.Hidden tulajdonság mutatja.
  Pl. If Range("D5").EntireColumn.Hidden Then Exit For

  Üdv.

• #36343 Fferi50 Topikgazda fricc_ #36340

  Új Válasz 2017-10-20 07:20:02 #36343

  Ú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

  

  Fferi50

  Topikgazda

  válasz fricc_ #36340 üzenetére

  Szia!

  A B3 képletében legyen abszolút az A oszlop, azaz $A3. Ezután a B oszlopban húzd le a képletet. Majd kijelölöd B4-től lefelé a cellákat. Másolás. C3 cellát kijelölöd. Irányított beillesztés, a panelen bejelölöd a képletet és a transzponálást.
  A B oszlop képletes celláit utána kitörölheted.

  Üdv.

• #36341 föccer nagyúr fricc_ #36340

  Új Válasz 2017-10-20 00:20:40 #36341

  Ú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

  

  föccer

  nagyúr

  válasz fricc_ #36340 üzenetére

  Írd át a B3-Y3 képleteket úgy, hogy a hivatkozás $A5 legyen. Ekkor ha másolod, vagy autofill-el dolgozol, akkor "odaragad" a $al kezdett hivatkozások ahol eredetileg vannak, nem fogja az excel dinamikus címként kezelni.

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