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

• #43348 Delila_1 veterán North15 #43347

  Új Válasz 2020-03-24 15:38:11 #43348

  Ú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 North15 #43347 üzenetére

  If ActiveCell.Font.Strikethrough = True Then MsgBox "áthúzott" Else MsgBox " nem áthúzott"

• #43073 ny.janos tag North15 #43072

  Új Válasz 2020-02-15 10:57:48 #43073

  Ú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

  

  ny.janos

  tag

  válasz North15 #43072 üzenetére

  Szia!

  Nálad valószínűleg csak az adott munkafüzet / munkalap betűtípusa lett átállítva, nem pedig az alapértelmezett. Az alapértelmezett betűtípust ugyanis nem változtatja meg a hivatkozás beszúrása.

• #39424 Delila_1 veterán North15 #39423

  Új Válasz 2018-10-21 15:50:48 #39424

  Ú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 North15 #39423 üzenetére

  A kimutatásban a sorcímkékhez beviszed a dátumot, az értékekhez ÉS az oszlopokhoz a helyszínt.
  A félkész kimutatásban ráállsz az egyik dátumra, Beállítások menü, Csoportosítás, Csoportosítási mező. Itt Ctrl segítségével megjelölöd az évek és a hónapok szerinti csoportosítást.

  Ennyi.

• #36905 Delila_1 veterán North15 #36903

  Új Válasz 2018-01-04 06:16:30 #36905

  Ú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 North15 #36903 üzenetére

  Szívesen, Rólandnak is.

• #36886 Delila_1 veterán North15 #36880

  Új Válasz 2018-01-03 08:00:19 #36886

  Ú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 North15 #36880 üzenetére

  Sajnos ez az Excel hibája. Hiába törlöd a korábbi adatokat, nem tudja feledni az előzőleg kitöltött területet. Emiatt nem is szoktam alkalmazni a Cells.SpecialCells(xlCellTypeLastCell).Row -t. Az esetedben egy rövid kis makróval megoldható az alsó sor kikeresése.

  Sub Also_sor()
Dim oszlop As Integer, usor As Long

For oszlop = 1 To 8
If Cells(Rows.Count, oszlop).End(xlUp).Row > usor Then
usor = Cells(Rows.Count, oszlop).End(xlUp).Row
End If
Next
MsgBox usor
End Sub

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