-
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
-
#38298
lappy
őstag
Kristof_94
#38296
lappy
őstag
válasz
Kristof_94
#38296
üzenetére
Szia!
Vagy ezt a fgv tudod használni PROPER- Tnév (csak ilyenkor kell még egy kis művelet mellé- azaz segédoszlop és áthelyezés)
vagy macroval tudod ezt megoldaniSub Uppercase()
' Loop to cycle through each cell in the specified range.
For Each x In Range("A1:A5")
' Change the text in the range to uppercase letters.
x.Value = UCase(x.value)
Next
End Sub
itt viszont nem kell tab -
#38218
lappy
őstag
dellfanboy
#38217
lappy
őstag
válasz
dellfanboy
#38217
üzenetére
a gugli segít ebben (csak pár szót kell beírni)
-
#38115
lappy
őstag
scott_free
#38111
lappy
őstag
válasz
scott_free
#38111
üzenetére
Fel lehet törni, vannak rá szoftverek
-
-
#37998
lappy
őstag
dellfanboy
#37997
lappy
őstag
válasz
dellfanboy
#37997
üzenetére
=ROUND(IF(AH1="BS",VLOOKUP(Z1,FX!A:MV,VLOOKUP(L1,'FX columns'!A: F,4,0),0),VLOOKUP(Z1,FX!A:MV,VLOOKUP(L1,'FX columns'!A: F,6,0),0)),5)
3 részből áll a ha fgv. két részeVLOOKUP(Z1,FX!A:MV,VLOOKUP(L1,'FX columns'!A: F,6,0),0))VLOOKUP(Z1,FX!A:MV,VLOOKUP(L1,'FX columns'!A: F,4,0),0)
és a kerekítés
az első fkeres- hamis ág
L1 -et keresi meg a tartományban majd ezen értéket használja fel az előtte lévő fkeres is
a második fkeres- igaz ág
hasonló a működése mint az elsőnek
kerekítés
vlamilyen érték kijön vagy az igaz vagy a hamis és kerekíti 5-el -
#37988
lappy
őstag
martin921231
#37986
lappy
őstag
válasz
martin921231
#37986
üzenetére
Dim DownTime As Date
Sub SetTimer()
DownTime = Now + TimeValue("01:00:00")
Application.OnTime EarliestTime:=DownTime, _
Procedure = "ShutDown", Schedule:=True
End Sub
Sub StopTimer()
On Error Resume Next
Application.OnTime EarliestTime:=DownTime, _
Procedure:="ShutDown", Schedule:=False
End Sub
Sub ShutDown()
Application.DisplayAlerts = False
With ThisWorkbook
.Saved = True
.Close
End With
End Subilletve
Private Sub Workbook_Open()
Call SetTimer
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Call StopTimer
End Sub
Private Sub Workbook_SheetCalculate(ByVal Sh As Object)
Call StopTimer
Call SetTimer
End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, _
ByVal Target As Excel.Range)
Call StopTimer
Call SetTimer
End Sub -
-
#37934
lappy
őstag
Peterhappy
#37933
lappy
őstag
válasz
Peterhappy
#37933
üzenetére
Pivot tábla? nem jó
-
lappy
őstag
Szia!
"ahol vagy számok vannak vagy 0" miért a 0 nem szám?!
Amúgy a lehetőségek:
az egyik hogy szűrést teszel az oszlopokra- szűrés "0" kivéve- másol- beilleszt
vagy
egy ha függvénnyel vizsgálod hogy a g értékét és újra szűrés kell majd
vagy
közvetlen szűrés és megadod neki hogy hova tegye az eredményt -
#37763
lappy
őstag
valyogvisko
#37762
lappy
őstag
válasz
valyogvisko
#37762
üzenetére
Ezt nem is fogod függvénnyel megoldani csak makróval lehet!!!
-
#37728
lappy
őstag
the radish
#37725
lappy
őstag
válasz
the radish
#37725
üzenetére
-
lappy
őstag
szintén ha fgv elég hozzá
a B2 cellába a
=HA(D2="igen";A2*(B1/100);A2)kód megy
a C2-be meg A2-B2
persze a C2 így mindig fog vmi értéket mutatni, de ezt ki lehet küszöbölni egy másik ha fgv.el
illetve a B2 cellá nem nézi hogy mi van D2 akkor ha az nem IGEN ha nem üres vagy más, de szintén egy ha fgv továbbírással ez is megoldható -
lappy
őstag
válasz
csoki46
#37557
üzenetére
Sub SaveNumberedFile()
Static count As Integer
Dim filestr As String
filestr = "C:\Users\Me\Documents\Code\TestWkbk"
ThisWorkbook.Activate 'Activate whichever workbook you need
If count = 0 Then
ActiveWorkbook.SaveAs (filestr & ".xls")
ElseIf count > 0 And Dir(filestr & "v" & count - 1 & ".xls") = "" Then
ActiveWorkbook.SaveAs (filestr & "v" & count & ".xls")
End If
count = count + 1
End Subannyi a baj vele hogy csak akkor számolja a változót ha meg van nyitva, bezárás esetén újra indul.
Célszerű valahova lementeni a füzeten belül ezt az értéket és minden megnyitásánál beolvasni. -
#37300
lappy
őstag
dellfanboy
#37299
lappy
őstag
válasz
dellfanboy
#37299
üzenetére
Tömbképlettel lehetne megpróbálni
-
#37147
lappy
őstag
toth_janika
#37145
lappy
őstag
válasz
toth_janika
#37145
üzenetére
egy segédoszlopban megnézed hogy melyik dátumnak kell ott lennie a szabályod szerint
ki is kell íratnod a megírt ha függvénnyel melyik legyen
ezután ezt az oszlopod kijelölöd és érték másolása majd beillesztés a megfelelő helyre és törölheted a segédoszlopot -
#37050
lappy
őstag
lasarus1988
#37049
lappy
őstag
válasz
lasarus1988
#37049
üzenetére
Szia
két fgv kell hozzá az egyik a HÓNAP fgv a másik meg a darabteli fgv ezekkel
a hónap függvényel megnézed a szabik melyik hónapba esnek a darabteli meg összeszámolja -
#37047
lappy
őstag
cskata0513
#37045
lappy
őstag
válasz
cskata0513
#37045
üzenetére
körlevélben gondolkodtál
oda olyan adatokat rakhatsz bele ami állandó és változó
én azzal próbálnám, de látatlanba nehéz megmondani hogy ez mennyire válik be mert ugye nem ismerem a táblázatban milyen adatok vannak -
lappy
őstag
válasz
GreenIT
#37006
üzenetére
fkeres függvénnyel
FKERES(keresni kívánt érték; tartomány, amelyben az érték megtalálható; visszatérési érték oszlopszáma a tartományban; pontos egyezés vagy közelítő egyezés – 0/HAMIS vagy 1/IGAZ érték)
a keresés és érték visszaadásnál be kell írni vagy kattintva a munkalap nevét
-
lappy
őstag
Új hozzászólás Aktív témák
Hirdetés
Fferi50- Formula-1
- WoW avagy World of Warcraft -=MMORPG=-
- Honor Magic6 Pro - kör közepén számok
- DUNE médialejátszók topicja
- Milyen okostelefont vegyek?
- Bevonják az AI-t az atomreaktorok építésébe
- Sweet.tv - internetes TV
- 6 év biztonsági támogatást ígér a Motorola
- Kerékpárosok, bringások ide!
- Milyen egeret válasszak?
- További aktív témák...
- Sea of Thieves Premium Edition és Egyéb Játékkulcsok.
- Eladó Steam kulcsok kedvező áron!
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Most kedvező áron!
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - NYÁRI AKCIÓ!
- 130+131+132+133 - Lenovo Legion Pro 7 (16IRX9H) - Intel Core i9-14900HX, RTX 4080
- Lenovo ThinkCentre M720q/ Dell OptiPlex 3060- 3070/ Hp EliteDesk 800 mini, micro PC-Számla/garancia
- BESZÁMÍTÁS! MSI Z370 i5 9500 16GB DDR4 512GB SSD RX6600 8GB Cooler Master MB510L Chieftec 500W
- Eladó ÚJ, BONTATLAN Samsung Galaxy A05s 4/64GB ezüst / 12 hónap jótállással!
- Csere-Beszámítás! AMD Ryzen 7 7700 Processzor!
Állásajánlatok
Cég: PC Trade Systems Kft.
Város: Szeged
Cég: CAMERA-PRO Hungary Kft
Város: Budapest