-
Fototrend
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Fferi50
Topikgazda
válasz
bepken
#50436
üzenetére
Szia!
Ha a szöveggel dolgoznod kell, akkor azt javaslom, külön oszlopba kerüljön a szöveg. Ha ugyanabban a cellába van szám és szöveg is, akkor a sorszámos képlet nem működik megfelelően, hiszen számot szöveggel nem tud összeadni.
A külön oszlopos összesítés például mehet SZUMHA függvénnyel vagy Kimutatással.
Üdv. -
Fferi50
Topikgazda
válasz
bepken
#50434
üzenetére
Szia!
A B1 cellába írd be az 1 számot.
A B2 cella képlete:=HA(A2<>0;HA(A2=A1;B1;MAX($B$1:$B1)+1);"")
Ez húzható lefelé.
A szöveget pedig cellaformázással adhatod meg:
Jobb egérgomb - cellaformázás - egyéni - Formátum: "Szöveg" ###
Ez azért jó, mert csak a megjelenítést változtatja, számolni ugyanúgy lehet vele, mert szám marad.
Üdv. -
bepken
veterán
válasz
bepken
#50433
üzenetére
hmmm közben sikerült úgy "megoldanom", hogy ha nulla az érték szerepel A oszlopban, akkor B oszlop értékét nem növeli....de hátha van ennél elegánsabb megoldás is
ja és akkor már még egy kérdés: a kapott számértéket szeretném hozzáfűzni egy szöveghez (pl.: "szoveg_") és a problémám az, hogy minden sorral újra és újra összefűzi, amikor ugyebár az A oszlopban nincs változás.
szoveg_1szoveg_1szoveg1szoveg_1szoveg_1szoveg_1ezt hogyan tudom elkerülni?
-
bteebi
veterán
válasz
bepken
#48936
üzenetére
Szia!
Először is szívesen.
Elsőre én is kicsit nehezen értettem meg, pedig amúgy nem annyira bonyolult. Nem teljesen azt adtad meg, amit szerettél volna. Azt mondtad, hogy ha az A oszlop a cél cella (Target) sorában nem üres, akkor írja be a B-be a dátumot. Vagyis ha a cél cella oszlopa nem az A oszlop volt, viszont a sorában az A oszlop nem üres, akkor is frissült a dátum.
Ehelyett az kellett, hogy ha az A oszlopban van a cél cella, akkor (és csak akkor) írjon a B-be, ha az nem üres. Hasonló, de nem ugyanaz.
Használd nyugodtan az ="" (üres) vagy épp <>"" (nem üres) kifekezéseket, illetve ha több feltételed is van, akkor azokat "And"-del vagy "Or"-ral fűzd össze.
-
slashing
senior tag
-
Delila_1
veterán
válasz
bepken
#22038
üzenetére
Próbáld ki ezzel:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Application.EnableEvents = False
On Error GoTo Hiba
If Target.Value <> "" Then
Cells(Target.Row, 2) = Date
Cells(Target.Row, 2).NumberFormat = "yy/mm/dd"
Else
Cells(Target.Row, 2) = ""
End If
Application.EnableEvents = True
End If
Exit Sub
Hiba:
MsgBox "Egyszerre csak egy adatot adj meg, vagy törölj!", vbOKOnly + vbExclamation
Application.EnableEvents = True
End Sub -
-
Delila_1
veterán
válasz
bepken
#22025
üzenetére
Igen, az a baja.
Egy kicsit másképp a makró. Ebben már az is benne van, hogy egyszer fusson le. Mikor beírsz a lapra valamit, beíródik a B oszlopba a dátum, erre újból lefut az EnableEvents ideiglenes letiltása nélkül.
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Value <> "" Then
Cells(Target.Row, 2) = Date
Cells(Target.Row, 2).NumberFormat = "yy/mm/dd"
Else
Cells(Target.Row, 2) = ""
End If
Application.EnableEvents = True
End SubMivel a C oszlop változtatását akarod figyeltetni, érdemes az egészet egy feltételbe beírni.
if target.column=3 then
...
endif
senkinek nincs ötlete erre?
Új hozzászólás Aktív témák
Fferi50- ÁRGARANCIA!Épített KomPhone i5 14400F 32/64GB RAM RX 9060 XT 8GB GAMER PC termékbeszámítással
- Akció! Gamer PC-Számítógép! Intel Ultra 5 245K / RTX 3080 10GB / 16GB DDR5 / 1TB SSD!
- Bomba ár! Dell Latitude 5410 - i5-10GEN I 16GB I 256SSD I HDMI I 14" FHD I Cam I W11 I Garancia!
- Thermalright Phantom Spirit 120 SE
- AKCIÓ! Microsoft XBOX Series X 1TB SSD fekete játékkonzol garanciával hibátlan működéssel
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest