- XPEnology
- Videó stream letöltése
- Kodi és kiegészítői magyar nyelvű online tartalmakhoz (Linux, Windows)
- Sweet.tv - internetes TV
- Otthoni hálózat és internet megosztás
- Xiaomi AX3600 WiFi 6 AIoT Router
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Milyen switch-et vegyek?
- Linux kezdőknek
- Hálózati / IP kamera
-
IT café
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
-
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.
-
KovacsUr
addikt
Bocs, még egy kérdés: Mi legyen azokkal a számokkal, amelyek csak a jobb oldali oszlopban szerepelnek?
Pld. itt az 5-össel:
1 1
2 2
3 3
4 4
4 5
4 6
6 7
...
Maradjon ki teljesen, vagy ott pedig épp a bal oldal legyen 'foghíjas'?So it goes… We stand alone by standing stones and turn them into circles.
-
KovacsUr
addikt
válasz kiskegyed #83 üzenetére
Csak egy nagyon triviális példa:
1 1
2 2
3 3
4 4
4
4
5 5
Mindig ugyanez lesz a kimenet, a második osloptól függetlenül.
Pedig ha a második oszlop tartalma pld. 1, 3, 4, 5, 6, 7, 8 lenne, a kimenetnek
1 1
3 3
4 4
4
4
5 5
-nek kellene lennie.So it goes… We stand alone by standing stones and turn them into circles.
-
KovacsUr
addikt
válasz kiskegyed #87 üzenetére
De még ez sem jó ám, helló Mondom, hogy én is próbálkoztam...
[Szerk.]
Illetve... tudja a fene. Lehet, hogy mégis jó. Már túl fáradt vagyok, majd a kérdező eldönti. Az is lehet, hogy én értettem félre.So it goes… We stand alone by standing stones and turn them into circles.
-
KovacsUr
addikt
Már hogy hagyhatná ki?
Illetve kihagyhatná, és akkor kapnál egy szép #UNDEFINED# vagy hasonló feliratot a celládba. Ezt szeretnéd? Nem értem a problémát. Gondold végig még egyszer, mit szeretnél, hogy megjelenjen a cellában, ha a kifejezés értéke hamis.So it goes… We stand alone by standing stones and turn them into circles.
-
KovacsUr
addikt
Félreérted a függvény lényegét. A függvény SOHA nem ''csinál'' semmit. Bizonyos feltételek alapján felvesz egy értéket.
Egyébként közben elolvastam, mit szeretnél... Tulajdonképpen arról lenne szó, hogy egyetlen helyről szeretnéd feltölteni az összes hónap adatait, ugye?So it goes… We stand alone by standing stones and turn them into circles.