- Samsung Galaxy S23 Ultra - non plus ultra
- Motorola Edge 40 - jó bőr
- Okosóra és okoskiegészítő topik
- Xiaomi 11 Lite 5G NE (lisa)
- Telekom mobilszolgáltatások
- Eredeti dizájnnal tér vissza idén a Nokia 225 4G
- Google Pixel 6/7/8 topik
- Apple iPhone 13 Pro Max - őnagysága
- Ezek a OnePlus 12 és 12R európai árai
- MG4 menetpróba
Hirdetés
-
AMD Radeon undervolt/overclock
lo Minden egy hideg, téli estén kezdődött, mikor rájöttem, hogy már kicsit kevés az RTX2060...
-
Érkezik Magyarországa az LG szuper dizájnos hordozható projektora
ph A szokatlan külsejű CineBeam Q képes a 4K felbontás megjelenítésére.
-
20 ezer új munkást visz Eindhovenbe az ASML
it Hatalmas politikai feszültséget okozott az ASML és a holland kormány nézeteltérése, de most úgy néz ki, hogy jelentős bővítésbe kezdenek Eindhovenben.
-
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
- Vicces képek
- Samsung Galaxy S23 Ultra - non plus ultra
- Videó stream letöltése
- Azonnali informatikai kérdések órája
- Vezeték nélküli fülhallgatók
- Motorola Edge 40 - jó bőr
- Kerékpársportok
- Canon MILC: EOS R és M topik
- A fociról könnyedén, egy baráti társaságban
- Anime filmek és sorozatok
- További aktív témák...
- Eladó Steam kulcsok kedvező áron!
- Canva Pro előfizetés - 1 éves
- Microsoft licencek a legolcsóbban - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Steam, Windows, Origin kulcsok, előfizetések közvetlenül a kiadótól, a LEGJOBB ÁRON!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! LEGOLCSÓBB! Automatikus 0-24