- Redmi Note 13 Pro 5G - nem százas, kétszázas!
- Körvonalazódik a HMD Pulse Pro is
- Különleges kameraszettet kapott a Huawei Pura 70 Ultra
- Samsung Galaxy Z Fold3 5G - foldi evolúció
- Fotók, videók mobillal
- Yettel topik
- Motorola Edge 40 neo - színre és formára
- Samsung Galaxy S23 Ultra - non plus ultra
- iPhone topik
- Honor 50 - apám nevében
Hirdetés
-
Egységesítéssel gyorsítaná fel fejlesztéseit a Google
ph A vállalat számos szoftveres és hardveres csapatot von össze az AI érdekében.
-
Az Intel a legmodernebb chipgyártó géppel előzheti meg az egész szektort
it Az Intel lett az első cég, amely szolgálatba állította az ASML új High NA EUV litográfiás chipgyártó eszközeit, ezzel minden riválisát megelőzheti.
-
Lenovo Essential Wireless Combo
lo Lehet-e egy billentyűzet karcsú, elegáns és különleges? A Lenovo bebizonyította, hogy igen, de bosszantó is :)
-
Mobilarena
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
-
airyca
csendes tag
Sziasztok!
Szeretném a segítségeteket kérni! A megoldandó dolog a következő: az A1 cellában van egy szám (pl. 241), a B1 cellában egy név (X.Y.) és azt szeretném, ha a C1 cellában az aznapi dátum jelenjen meg amikor vagy a számot vagy a nevet beírom.
Köszi:Airyca -
airyca
csendes tag
-
KovacsUr
addikt
Jobb klikk a worksheet fülön, Kód megjelenítése
aztán ezt beilleszt
Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Value <> '''' And (Target.Column = 1) Or (Target.Column = 2) Then
Cells(Target.Row, 3).Activate
ActiveCell.Value = Date
ActiveCell.NumberFormat = ''yyyy/mm/dd''
End If
End SubSo it goes… We stand alone by standing stones and turn them into circles.
-
KovacsUr
addikt
Bocs... v1.1
Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Value <> '''' And (Target.Column = 1) Or (Target.Column = 2) Then
Cells(Target.Row, 3).Activate
ActiveCell.Value = Date
ActiveCell.NumberFormat = ''yyyy/mm/dd''
Target.Activate
End If
End SubSo it goes… We stand alone by standing stones and turn them into circles.
-
KovacsUr
addikt
Azért szólhatnál, hogy most ez megfelel-e vagy nem :/
So it goes… We stand alone by standing stones and turn them into circles.
-
KovacsUr
addikt
No, próbálom újra...
Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Value <> "" And (Target.Column = 1) Or (Target.Column = 2) Then
Cells(Target.Row, 3).Activate
ActiveCell.Value = Date
ActiveCell.NumberFormat = "yyyy/mm/dd"
Target.Activate
End If
End Sub
Most & q u o t ;-ot írtam '' helyett, hátha így nem javítja ki...So it goes… We stand alone by standing stones and turn them into circles.
-
KovacsUr
addikt
-
KovacsUr
addikt
Kipróbáltam, visszamásoltam.
Magyar Office97 és angol Office XP alatt működik, úgyhogy remélhetőleg a köztük lévő összes többin is
Ha mégsem, akkor tényleg nincs több ötletemSo it goes… We stand alone by standing stones and turn them into circles.
-
szucsi
őstag
Kedves Excelben Excellálók! (nylvszk kmljtk)
plíz segítsetek:
szitu: Van ugye az 1.sor, ahova bekerült a változónév, alattuk az adatok.
probléma: Ha megtelik egy képernyőnyi sor, a változónév ugye eltűnik, pedig jó lenne látni
kérdés:
1) lehet-e az oszlopoknak alternatív címkét adni (a változónevet), és hogyan?
2) be lehet-e állítani, hogy az első sor együtt gördüljön a kerettel.
Köszi. -
szucsi
őstag
Mégegy kérdés:
van 5 oszlop adat, pl:
10,13,12,15,10
arra vagyok kíváncsi, milyen képlettel lehet összegezni csak az előző értékhez való negatív eltéréseket (elnézést, ha nem elég matekos).
tehát az előző sorból van egyszer a 13-12 (1) és a 15-10 (5) ezek összege 6.
Köszi
Új hozzászólás Aktív témák
- Akár 368 TB-nyi NVMe SSD-t is pakolhatunk a Western Digital "kofferébe"
- World of Tanks - MMO
- AI-gyártású celebpornóval küzd a Facebook
- BestBuy topik
- EAFC 24
- Vírusirtó topic
- Kétféle tájolással munkára fogható, ITX-es ház jött a Sharkoontól
- PlayStation 5
- Cyberpunk 2077
- Milyen routert?
- További aktív témák...
- Steam, Windows, Origin kulcsok, előfizetések közvetlenül a kiadótól, a LEGJOBB ÁRON!
- Microsoft licencek a legolcsóbban - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Eladó aktív domain nevek, weboldal tartalommal együtt
- Adobe Creative Cloud - 2024. 04. 05 - 2025. 04. 05-ig
- Bontatlan - BATTLEFIELD 1 Collectors Edition - Játékszoftver nélkül