-
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
-
Delila_1
Topikgazda
válasz Pikkolo^^ #32149 üzenetére
Nem látszanak a sor- és oszlopazonosítók a képen.
Modulba tedd a makrót.
Sub Kigyujtes()
Dim sor As Long, oszlop, ide As Long
sor = 3
Do While Cells(sor, "B") <> ""
oszlop = Application.Match(Cells(sor, "C"), Rows(2), 0)
If VarType(oszlop) = vbError Then
MsgBox "Nincs " & Format(Cells(sor, "C"), "yyyy.mm.dd") & " dátum a 2. sorban"
Else
ide = Cells(Rows.Count, oszlop).End(xlUp).Row + 1
Cells(ide, oszlop) = Cells(sor, "B")
End If
sor = sor + 1
Loop
End SubNézd meg a képen, hogy a keresendő dátumokat tartalmazó sor feljebb van, mint a C oszlop első dátuma, ez fontos.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
bsasa1
csendes tag
-
bsasa1
csendes tag
válasz DeFranco #31836 üzenetére
Szia!
Bár nem hiszem, hogy már érdekes, de ha mégis, akkor ez a te mátrixodra is tud működni.
2 sor képlete:
Oszlopok megtalálása:
HAHIBA(KICSI(HA(($A2:$T2)<>"";OSZLOP($A2:$T2);"");1);""), tömbképlettel, annyi, hogy az 1-est kell cserélni attól függően hányadik találatot szeretnéd.
Mellé értékek:
HAHIBA(INDEX($A2:$T2;;V2);"") -
bteebi
veterán
Sziasztok! Egy mappából szeretnék egy cellában megadott file-t megnyitni. A file-ok elnevezése lista_"dátum".pdf, pl. lista_201601.pdf. A dátumot kérem be a C4-es cellába. Ezt a makrót írtam hozzá:
Sub listakereso()
Dim datum As Long
datum = ActiveSheet.Range("C4")
If Dir$("D:\Proba\lista_" & datum & ".pdf", vbDirectory) <> "" Then
Shell CreateObject("Wscript.Shell").RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\AcroRd32.exe\") & " /A " & Chr(34) & "&zoom=" & 95 & Chr(34) & " " & Chr(34) & "D:\Proba\lista_" & datum & ".pdf" & Chr(34), vbNormalFocus
Else
MsgBox "Nem találom a listát!", vbExclamation
End If
End SubTeljesen jól működik - vagyis működne -, viszont a file-oknak esetenként több verziója van (és mindegyik verzió benne van a mappában), a fenti példánál maradva pl. lista_201601 v1.pdf (és akár v2, v3, stb.). Emiatt szükség van arra (?), hogy egy loop-pal végignézze az összes file-t:
Sub listakereso2()
Dim datum As Long, file As Variant
datum = ActiveSheet.Range("C4")
Do While (file <> "")
If Mid(file, 7, 6) = datum Then
Shell CreateObject("Wscript.Shell").RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\AcroRd32.exe\") & " /A " & Chr(34) & "&zoom=" & 95 & Chr(34) & " " & Chr(34) & "D:\Proba\" & file & Chr(34), vbNormalFocus
Exit Sub
End If
file = Dir()
Loop
MsgBox "Nem találom a listát!", vbExclamation
End SubEz azonban még mindig csak ugyanazt csinálja, amit az előző makró, csak jóval bonyolultabban. A feladat pedig igazából az lenne, hogy a legutolsó file verzió nyíljon meg. Ennél viszont már sajnos elfogy nálam a tudomány. Tudnátok ötletet adni arra, hogy hogy lehetne folytatni?
A legideálisabb megoldás egyébként az lenne, ha pl. egy message boxba (vagy input boxba) össze lenne gyűjtve az összes file verzió (beleértve az eredeti file-t is), és pl. egy radio button-nel (vagy esetleg drop down-nal) lehetne kiválasztani a megfelelő file-t.
Előre is köszönöm a segítségeteket!
Cancel all my meetings. Someone is wrong on the Internet.
-
ipij
csendes tag
Sziasztok!
Segítséget szeretnék kérni EXCEL MAKRÓ ügyben.
Több alakzatokhoz (pl. téglalap) szeretnék rendelni egy makrót.
A makró attól függően futna le, hogy melyik alakzatra kattintottam.
A kérdés, hogy hogyan tudom lekérdezni az alakzat nevét amire kattintottam?
(Kijelölt alakzat nevét letudom kérdezni, de az nem jó.)
(Nagyon kezdő vagyok!)
Előre is köszönöm.
Üdv:
ipi -
bteebi
veterán
-
Pikkolo^^
addikt
Arra van lehetőség, hogy egy Excel munkalap tartalma egy gombnyomásra egy üres Word dokumentumba kerüljön bele? Természetesen makrón keresztül.
-
Fferi50
őstag
Szia!
Sajnos ezt csak úgy tudod megoldani, ha minden alakzathoz rendelsz egy makrót, ami alapján fogod tudni az adott alakzat nevét.
A közös makrót pedig a névvel paraméterezve hívod meg.
Pl.Sub makro_teglalap1
makro_kozos "teglalap1"
End Sub
Sub makro_kozos(ByVal neve As String)
Select Case neve
Case Is = "teglalap1"
'ide jön amit csinálnia kell
Case Is = "valami mas........"
'ide jön amit csinálnia kell
End Select
End SubAz egyenkénti makrót egyszer megírod, utána másolod és változtatod benne a neveket.
Üdv.
[ Szerkesztve ]
-
Fferi50
őstag
válasz bteebi #32157 üzenetére
Szia!
Szerintem a dir() paranccsal végig tudsz menni az összes fájlon.
file=Dir("D:\Proba\lista_" & datum & "*.pdf"
do while file<>""
lista=lista & "," & file
file=dir()
loop
A listát használhatod egy cella érvényesítéséhez, amiből kiválasztható amelyiket meg kell nyitni, vagy csinálhatsz egy drop-down-t a munkalapon, aminek a forrása a lista.Ezen kívül lehet még olyan, hogy a FileDateTime(file) függvénnyel lekérdezed az adott fájl dátumát és a legfrissebbet kiválasztod megnyitásra.
Üdv.
[ Szerkesztve ]
-
Fferi50
őstag
válasz Pikkolo^^ #32160 üzenetére
Szia!
Igen, meg kell nyitnod hozzá a Word alkalmazást az Excel makróban, abba kreálni egy új dokumentumot és az Excel tartalmat belemásolod.
Sub wordos()
Dim wrd As Object, wd As Document
Set wrd = CreateObject("word.application") 'Word nyit
wrd.Visible = True
Set wd = wrd.documents.Add 'új dokumentumot nyit
ActiveSheet.UsedRange.Copy 'kijelölöd a másolandó területet (pl. Range("A1:F25")
wrd.Selection.Paste 'ha képként szeretnéd beilleszteni, akkor PasteSpecial, paraméterekkel HELP segít
wrd.Activate
wd.Save 'itt meg kell adnod, hogy milyen néven mented
wrd.Quit ' Word bezár
End SubFigyelem! A makró futtatása előtt a VBA ablak Tools Menüjében a References menüpontban be kell jelölnöd a megfelelő Microsoft Word könyvtárat!!! (pl. 2016-os nál Microsoft Word 16.0 Object Library).
Üdv.
-
ipij
csendes tag
-
bteebi
veterán
válasz Fferi50 #32163 üzenetére
Köszönöm! Módosítottam a makrót, így már egy dropdown-ba (vagy bármi másba) ki tudom gyűjteni a file-okat az általad megadott módon. Hogy lehetne ezt megjeleníteni egy message/input boxban?
Sub listakereso()
Dim datum As Long, file As Variant, lista As String
datum = ActiveSheet.Range("C4")
file = Dir("D:\Proba\lista_" & datum & "*.pdf")
lista = ""
Do While (file <> "")
If lista = "" Then
lista = file
Else
lista = lista & "," & file
End If
file = Dir()
Loop
With ActiveSheet.Range("C5").Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= xlBetween, Formula1:=lista
.IgnoreBlank = True
.InCellDropdown = True
End With
If lista = "" Then
MsgBox "Nem találom a listát!", vbExclamation
End If
End SubCancel all my meetings. Someone is wrong on the Internet.
-
Delila_1
Topikgazda
válasz bteebi #32169 üzenetére
Létrehozol egy userformot, ami egy listboxot tartalmaz, meg egy gombot.
Modulba:
Sub ListaFeltoltes()
Dim FN As String
FN = Dir("D:\Proba\lista_" & datum & "*.pdf")
Do While FN <> ""
UserForm1.ListBox1.AddItem FN
FN = Dir()
Loop
UserForm1.Show
End SubEz a makró feltölti a feltételeknek megfelelő fájlok nevével a listboxot, és indítja a formot.
A gomb click eseményébe írhatod be, hogy mi legyen a listboxban kiválasztott 1 vagy több fájllal. Ha többet is ki akarsz választani, akkor a listbox MultiSelect tulajdonságát fmMultiSelectMulti-ra kell állítanod, az alapértelmezett fmMultiSelectSingle helyett.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
válasz bteebi #32169 üzenetére
Másik módszer, ha a C5-be akarsz érvényesítést bevinni a fájlnevekhez.
Az M oszlopba írtam be pár adatot, az M1-ben címmel. A tartományt táblázattá alakítottam, M2-től lefelé elneveztem a tartományt. A C5 forrásához ezt a nevet vittem be.
Sub ListaFeltoltes_1()
Dim FN As String, sor As Long
Range("M2:M" & Range("M" & Rows.Count).End(xlDown).Row).ClearContents
FN = Dir("D:\Proba\lista_" & datum & "*.pdf")
sor = 2
Do While FN <> ""
Range("M" & sor) = FN
sor = sor + 1
FN = Dir()
Loop
End SubFuttatás után a kiválasztott fájlok nevei lesznek a C5 érvényesítésében.
Azt is megteheted, hogy a fájlnevek betöltése után emelkedő sorrendbe rendezed az M oszlopot, majd a C5-ben az M oszlop alsó értékét jeleníted meg az érvényesítés helyett.
=INDEX(M:M;HOL.VAN("zzzz";M:M;1);1)
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
bteebi
veterán
válasz Delila_1 #32170 üzenetére
Nagyon köszönöm! Már majdnem teljesen jól működik . A UserForn-on létrehoztam egy OK és egy Cancel gombot. A Cancel gombbal csak be akarom zárni a formot, és megszüntetni a kijelölést/törölni a listát. Ha jól gondolom, akkor arra jó ez a két sor:
UserForm1.Hide
UserForm1.ListBox1.ClearA ListBox-ban kijelölt elem(ek)re egyébként hogy kell hivatkozni (engedélyeztem a MultiSelect-et)? Én azt hittem, hogy a
ListBox1.Selected
jó lesz erre, de azzal nem működik, "Argument not optional" hibaüzenetet kapok. Hogy kellene hivatkoznom rá?Shell CreateObject("Wscript.Shell").RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\AcroRd32.exe\") _
& " /A " & Chr(34) & "&zoom=95" & Chr(34) & " " & Chr(34) & "D:\Proba\" & ListBox1.Selected & Chr(34), vbNormalFocusCancel all my meetings. Someone is wrong on the Internet.
-
Delila_1
Topikgazda
válasz bteebi #32172 üzenetére
For sor = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(sor) = True Then
' **** amit akarsz ***
Exit For 'ezt csak akkor érdemes megadni, ha csupán 1-et akarsz kiválasztani a listából
End If
NextA form bezárása Unload Me.
[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
bteebi
veterán
válasz Delila_1 #32173 üzenetére
Ezt is köszönöm!
Végül összeállt minden, és jó is lett. Bemásolom ide a végső kódokat:
Sub listakereso()
Dim datum As Long, file As Variant
datum = ActiveSheet.Range("C4")
file = Dir("D:\Proba\lista_" & datum & "*.pdf")
Do While (file <> "")
UserForm1.ListBox1.AddItem file
file = Dir()
Loop
If UserForm1.ListBox1.ListCount = 0 Then
MsgBox "Nem találom a listát!", vbExclamation
Exit Sub
End If
UserForm1.Show
End SubAz OK gombhoz rendelve pedig:
Private Sub ButtonOK_Click()
Dim sor As Integer
For sor = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(sor) = True Then
Shell CreateObject("Wscript.Shell").RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\AcroRd32.exe\") _
& " /A " & Chr(34) & "&zoom=95" & Chr(34) & " " & Chr(34) & "D:\Proba\" & ListBox1.List(sor) & Chr(34), vbNormalFocus
End If
Next sor
Unload Me
End SubLényeges elem, hogy bár a kiválasztást a
ListBox1.Selected(sor)
adja, a listaelem nevét viszont aListBox1.List(sor)
- időbe telt, amíg megtaláltam .Cancel all my meetings. Someone is wrong on the Internet.
-
Mittu88
senior tag
Sziasztok!
Van megint egy olyan problémám, amire még Stackoverflow-on se találok megoldást...
Van ez a kép:
Az én gépemen hiba nélkül lefut, a belső hálózatról megnyitja a Database.xlsx-et, a wb változó kap is nevet meg minden.
VISZONT: egy másik gépen hibára fut ( Type Mismatch '13' ). Azaz érdekes a jelenség. Megnyitja a fájlt, de dobja ezt a hibaüzenetet. Ezután rámegyek az End-re, vagy Debug-ra (aztán a négyzetre kattintva leállítom, lényegtelen), majd a következő futtatáskor lefut...
Számít az, hogy azon a gépen le van tiltva az internet, és csak hálózat van?
Más különbség nincs a gépek között. Talán még annyi, hogy ott lehet, hogy 32 bites a windows, nálam meg 64.
u.i.: a fájlszerveren az adott mappához mindenkinek van írási-olvasási joga.
[ Szerkesztve ]
-
Fferi50
őstag
válasz Mittu88 #32176 üzenetére
Szia!
Nem oka a hibának szerintem, de felesleges az Err változót definiálnod, mivel az rendszer függvény, ami az ErrObjectet adja vissza - alapértelmezett tulajdonsága a Number.
Talán az lehet a probléma, hogy sok időbe telik megtalálnia a fájlt a hálózaton, esetleg érdemes lenne megpróbálni, hogy előtte arra a könyvtárra ugrassz a makróban a chdir paranccsal.
A Type Mismatch hibát a wb változódra írja ki?
Üdv.
-
Mittu88
senior tag
válasz Fferi50 #32177 üzenetére
Szia Feri!
Megpróbálom a chdir-t, és szólok, hogy javult-e a helyzet.
Amúgy szerintem nem a wb változóra írja, bár tény, hogy Nothing-on marad.
Találtam neten egy hasonló problémát: ITT
A srác nem Workbook változóra állítva nyitja meg a fájlt, és mégis jelentkezik nála a probléma NÉHA.
Ez az érthetetlen amúgy, hogy nálam is, elsőre hibára fut, de ha lelövöm a makrót hibára futás után, és utána be akarom zárni az excelt (workbook_close esemény hatására fut ez is), akkor simán lefut.
u.i.: szinte ugyanaz a hardver mindkét gépen. A szoftver meg teljesen ugyanaz.
[ Szerkesztve ]
-
Fferi50
őstag
válasz Mittu88 #32179 üzenetére
Szia!
Sajnos csak tippelgetek (mint anno a rabbi a juhoknál ).
Milyen tartalma van annak a fájlnak, amiből megnyitod a másikat? Nem lehet, hogy nagy munkalap aktív éppen benne?
(Nekem volt olyan problémám régebben, hogy diagram makrós beszúrásánál nem adta hozzá a címet meg még egy-két dolgot makró futáskor, ha lépésenként futtattam, akkor viszont nem jött elő a hiba... Hosszú idő után az derült ki, hogy egy nagyon sok adatot tartalmazó munkalap után próbáltam beszúrni a diagramot és ez vitte "tévútra" a folyamatos futású makrót - valami miatt az aktív munkalapról akart adatot rakni a diagramba beszúráskor. Amint egy kis adattartalmú munkalap volt aktív, ez a probléma megszűnt.!)Nem tudom, hogy munkafüzet nyitáskor ilyen okozhat-e problémát.
Talán meg kellene próbálni egy teljesen üres, csak a makrókat (+ egy munkalap) tartalmazó munkafüzettel futtatni.Üdv.
-
Mittu88
senior tag
válasz Fferi50 #32180 üzenetére
Az makrós fájlban jelenleg 220 sornyi adat van, kb 18 oszlop szélesen. Van még egy háttéradat munkalap, de azon jelentéktelen mennyiségű adat van.
A fájlszerveren lévő fájlban (amit megnyit a makró) 1200 sornyi adat van.
Amúgy úgy működik a rendszer, hogy a makrós fájlban rögzítik a gépekhez tartozó adatokat (termelés, műszaki hiba, stb.)
Ha mindegyik esemény (sor) lezárt, vagy törölt állapotú, akkor engedi bezárni a fájlt.
Ha bezárja, megnyitja a fájlszerveren lévő adatbázisfájlt, és oda feltölti azokat, amik még nem rögzítettek. Ezek a sorok utána a Rögzített oszlopba kapnak egy 1-es értéket.
Megpróbálhatom a kisebb munkalapra váltást, de a háttéradatos munkalap nagyon rejtettben van, úgyhogy max. beszúrok egy munka1-et.
-
Fferi50
őstag
válasz Mittu88 #32182 üzenetére
Szia!
Nem tudom, hogy az Office újratelepítés segíthet-e. Erre mondják, hogy próba-szerencse. De az általad linkelt problémát sem oldották meg....
Valószínűleg a gép memóriája "zavarodik meg" időnként, ezért írja a típushibát. A parancsgombok is okozhatják - milyen típusúak? ActiveX vagy Munkalap vezérlők?Helyette inkább javasolnám a Ribbonra feltenni saját menüként - ha szeretnéd, tudok benne segíteni - a Custom UI programmal lehet megoldani.
Üdv.
Ui: csak estefelé leszek elérhető újra.
-
Mittu88
senior tag
válasz Fferi50 #32183 üzenetére
ActiveX verzérlőket használok. Munkalap vezérlőt még sose használtam, az ActiveX vezérlőben eddig mindent meg tudtam oldani.
Ribbonra fel tudom úgy tenni, hogy akármelyik gépen nyitják meg, ugyanott jelenjen meg?
Szívesen megismerném ezt a módszert is. Én délután 4 után nem leszek, holnaptól meg nyaralok vasárnapig. Írnál egy gyorstalpalót privátban (vagy akár itt, hátha másokat is érdekel)?
-
Delila_1
Topikgazda
válasz Mittu88 #32184 üzenetére
Mivel Feri csak estére ígérte a választ, megpróbálom helyettesíteni.
A Téma összefoglalóban elolvashatod a personal füzet létrehozásának a módját. Ebbe másold be a már működő makró(i)dat.
Itt meglátod, hogyan tehetsz ki ikont a makró(k) indításához a gyorselérési eszköztárra.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
bexinho23
őstag
Üdv!
Van egy viszonylag jól összedobott "finance management"-em, amit szerintem még jobban le lehetne egyszerűsíteni. Viszont ötletek híján vagyok. Sokat kerestem google-ben template-eket, amikből átemelhetnék hasznos funkciókat az enyémbe, de alig találni valóban kreatívat, nem önismétlőt.
VBA-t elég jól ismerem, tehát nem lenne akadály annak használata sem. De mivel mobilról is megnyitom ezt az excel fájlt, így jó lenne, ha nem ütköznék akadályba megnyitáskor. Így lehet ezt most mellőzném.
Ti használtok saját költségvetésetek kezelése céljából ilyen ilyen "programot"?
-
dellfanboy
senior tag
melyik az a fv amivel osszetudom adni a kulonbozo sorokban levo ertekeket
igy nez ki a tabla
Aoszlop Boszlop
sor1 a 2
sor2 a 3
sor3 b 4
sor4 b 2
azt keresem hogy a =5, b=6[ Szerkesztve ]
eladó dolgok:mondd az árát és vidd http://hardverapro.hu/tag/dellfanboy#aprohirdetesei
-
dellfanboy
senior tag
válasz dellfanboy #32187 üzenetére
ill ha #N/A-t kapok eredmenynek hogy tudom automatikusan 0-va varazsolni?
elozo HSz-hoz a1 cella erteke A b1 cella erteke 2
a2 cella a b2 erteke 3[ Szerkesztve ]
eladó dolgok:mondd az árát és vidd http://hardverapro.hu/tag/dellfanboy#aprohirdetesei
-
dellfanboy
senior tag
megvan sumif f*sze vagyok neha ennyire balek mentsegemre legyen mondva mennek mar haza es en tartom mar csak a frontot
eladó dolgok:mondd az árát és vidd http://hardverapro.hu/tag/dellfanboy#aprohirdetesei
-
gaben1117
senior tag
Sziasztok!
Egy elég fura kérésem lenne felétek. Össze kéne írnom 6 db elméleti excel kérdést, ami arra lenne hivatott hogy konkrét feladat vagy teszt íratása nélkül nagyjából kiderüljön, hogy a válaszadó mennyire van képben az excel-lel.
Kb. olyan felosztásba kéne nehézség szerint, hogy 2 alap, 2 közepes és 2 gyakorlottabb kérdés, amit már csak az tudhat jól megválaszolni, aki rendszeresen használja.
Előre is köszönöm a segítséget!
-
bteebi
veterán
Sziasztok! Egy adott értéket (ami a D8-as cellában található) szeretnék megkeresni egy makróval megnyitott, elég sok lapot tartalmazó munkafüzetben. Azt szeretném, hogy a keresett értéket tartalmazó cellára ugorjon a makró (elvileg csak egy ilyen cella van). A keresés része nem működik. Megnéznétek, hogy mi a gond vele? Előre is köszönöm!
Sub holvan()
Dim srch As String, ws As Worksheet
srch = ActiveSheet.Range("D8")
Workbooks.Open Filename:="D:\proba\minta.xls", ReadOnly:=True
For Each ws In Workbooks("minta.xls").Worksheets
Set found = ws.Cells.Find(What:=srch, LookIn:=xlValues, LookAt:=xlPart)
Next ws
End SubCancel all my meetings. Someone is wrong on the Internet.
-
Delila_1
Topikgazda
válasz bteebi #32191 üzenetére
Kihagytam a másik füzet megnyitását, csak a saját minta füzetemben kerestettem. Majd beírod.
Sub Ugras()
Dim srch As String, ws As Worksheet, lel
srch = "KeresettSzoveg"
For Each ws In Worksheets
On Error Resume Next
lel = ws.Cells.Find(What:=srch, LookIn:=xlValues, LookAt:=xlPart).Address
If lel Then
Application.Goto reference:=Sheets(ws.Name).Range(lel)
Exit Sub
End If
Next ws
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Bjørgersson
félisten
Sziasztok!
Olyan függvényt keresek, ami óó:pp formátumú időt alakít át egész vagy törtszámokká. Pl. 12:00 = 12; 6:30 = 6,5; 7:15 = 7,25; stb.
Az óra függvényt már megtaláltam, viszont úgy tűnik, hogy lefele kerekített egész számokká alakítja az időket, az pedig nekem nem jó. Lehetséges, hogy átsiklottam valami fölött?[ Szerkesztve ]
As if all this was something more than another footnote on a postcard from nowhere, another chapter in the handbook for exercises in futility...
-
Bjørgersson
félisten
válasz Bjørgersson #32195 üzenetére
Na közben csak sikerült megfejtenem. Az adott idő formátumú cellát megszorozva 24-gyel megkapom az adott időt szám formájában.
As if all this was something more than another footnote on a postcard from nowhere, another chapter in the handbook for exercises in futility...
-
lappy
őstag
válasz Bjørgersson #32195 üzenetére
Próbáld a cella formatumot számkent kezelni
Bámulatos hol tart már a tudomány!
-
Fferi50
őstag
válasz Bjørgersson #32198 üzenetére
Szia!
Próbáltam, de úgy pl. a 11:00-ból 0,46-ot kapok.
Ami teljes mértékben egyezik is az Excel dátum/idő tárolási szabályaival, ami a következő: A dátumot/időt az Excel számként tárolja, az egész rész a dátumszámolás kezdetétől eltelt napokat jelenti, a törtrész pedig a napon belüli időt 24 órás napra vetítve.
Tehát az előző hsz-ban helyesen tetted, hogy az időt (azaz a törtrészt) megszoroztad 24-gyel. Arra viszont figyelni kell, ha napok is vannak, akkor (is) csak a törtrészt szabad szorozni (kivéve, ha a napokat is órákká szeretnéd alakítani)!Üdv.
Új hozzászólás Aktív témák
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Politika
- Trollok komolyan
- EAFC 24
- Samsung Galaxy A54 - türelemjáték
- NVIDIA GeForce RTX 4060 / 4070 S/Ti/TiS (AD104/103)
- Vicces képek
- gban: Ingyen kellene, de tegnapra
- Übergyors Samsungnak próbál látszani egy hamisított NVMe SSD
- A fociról könnyedén, egy baráti társaságban
- További aktív témák...
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!
- Eladó Steam kulcsok kedvező áron!
- Steam, Windows, Origin kulcsok, előfizetések közvetlenül a kiadótól, a LEGJOBB ÁRON!
- Steames kulcsok jó áron eladóak!
- Microsoft licencek a KIVÉTELES ÁRAK - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office