DIG Digital Corner
Alles wat je altijd al over computers, hardware, software, internet en elektronische gadgets had willen weten, maar niet op Tweakers.net durft te vragen.
Nee. Wen er maar aanquote:Op dinsdag 7 februari 2012 11:31 schreef Setting_Sun het volgende:
Excel 2010 de look van Excel 2007 geven, kan dat?
En ook al zou het kunnen zou ik het niet doen als ik jou was.
gewoon even eraan wennen.quote:
Excel 2010 de look van Excel 2007 geven, kan dat?
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Werkte de tip van Wokkel?quote:Op dinsdag 7 februari 2012 08:52 schreef Frixel het volgende:
[..]
Inderdaad, als A1 blad 1 gelijk is aan A23 blad 2 dan moet ook B1 met B23 worden vergeleken en zo verder want er kan een "afwijking" in de volgende kolommen voorkomen.
dat maakt het zo ingewikkeld vrees ik.
Op deze locatie kun je een zipfile downloaden die de volgende files bevat:
Master (voorbeeld file)
Slave (voorbeeld file)
MergeFile.xls (excel sheet)
MergeFile.xla (add-in)
Mergefile gaat het om, de master en slave zijn twee files die samengevoegd moeten worden
Ik ben ervan uitgegaan dat in zowel de master als de slavefile het de eerste sheet (tabblad) betreft
Er zit een hoop bla bla code bij om het één en ander gebruiksvriendelijk te maken (een menu met een item, een userform voor het aanwijzen van de files en MOU en MOA)
Uiteindelijk gaat het om de routine MergeFiles. (zie code hieronder). Wat je moet weten is dat "sheets(1)" slaat op het eerste tabblad, je kan dit zelf (consequent!) aanpassen (WB1 is de master, wb2 is de slave)
MergeFile is twee keer toegevoegd, 1 keer als xls (een gewoon werkboek) en 1 keer als .xla. Dit is een add-in die je via invoegtoepassingen standaard in excel kunt installeren
Ik heb klachten gezien dat je virusscanner op mediafire kan afgaan, daar kan ik niets aan doen. De code zelf in de xla en de xls is identiek en vrij toegankelijk en is virus vrij.
Ik raad je wel aan om altijd een backup te maken van je master en slave file voor je gaat testen met mijn code, want tja, ik blijf een hobby programmeur.
Als je Mediafire niet vertrouwt kan ik je de zipfile ook mailen, DM me dan.
[ Bericht 46% gewijzigd door #ANONIEM op 07-02-2012 20:10:51 ]
Master (voorbeeld file)
Slave (voorbeeld file)
MergeFile.xls (excel sheet)
MergeFile.xla (add-in)
Mergefile gaat het om, de master en slave zijn twee files die samengevoegd moeten worden
Ik ben ervan uitgegaan dat in zowel de master als de slavefile het de eerste sheet (tabblad) betreft
Er zit een hoop bla bla code bij om het één en ander gebruiksvriendelijk te maken (een menu met een item, een userform voor het aanwijzen van de files en MOU en MOA)
Uiteindelijk gaat het om de routine MergeFiles. (zie code hieronder). Wat je moet weten is dat "sheets(1)" slaat op het eerste tabblad, je kan dit zelf (consequent!) aanpassen (WB1 is de master, wb2 is de slave)
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 | Sub MergeFiles() If WB_1 = "" Then Exit Sub If WB_2 = "" Then Exit Sub MOA Workbooks.Open (WB_1) WB_1_Name = ActiveWorkbook.Name WB_1_LastCell = Workbooks(WB_1_Name).Sheets(1).Cells.SpecialCells(xlCellTypeLastCell).Row Workbooks.Open (WB_2) WB_2_Name = ActiveWorkbook.Name WB_2_LastCell = Workbooks(WB_2_Name).Sheets(1).Cells.SpecialCells(xlCellTypeLastCell).Row NewRow = WB_1_LastCell + 1 'regel i uit de slave file moet vergeleken worden met iedere regel j uit de masterfile 'als regel i voorkomt in de masterfile dan doet de routine niets 'als regel i niet voorkomt in de masterfile zet de routine regel i onder de masterfile For i = 1 To WB_2_LastCell Application.StatusBar = CInt(i / WB_2_LastCell * 100) & "% klaar" SlaveStr = "" MasterStr = "" UniqueRow = True For KolTel = 1 To 8 SlaveStr = SlaveStr & Workbooks(WB_2_Name).Sheets(1).Cells(i, KolTel) Next For j = 1 To WB_1_LastCell MasterStr = "" For KolTel = 1 To 8 MasterStr = MasterStr & Workbooks(WB_1_Name).Sheets(1).Cells(j, KolTel) Next If SlaveStr = MasterStr Then UniqueRow = False End If Next If UniqueRow = True Then For KolTel = 1 To 8 Workbooks(WB_1_Name).Sheets(1).Cells(NewRow, KolTel) = Workbooks(WB_2_Name).Sheets(1).Cells(i, KolTel) Next NewRow = NewRow + 1 End If Next Workbooks(WB_2_Name).Close False MOU End Sub |
MergeFile is twee keer toegevoegd, 1 keer als xls (een gewoon werkboek) en 1 keer als .xla. Dit is een add-in die je via invoegtoepassingen standaard in excel kunt installeren
Ik heb klachten gezien dat je virusscanner op mediafire kan afgaan, daar kan ik niets aan doen. De code zelf in de xla en de xls is identiek en vrij toegankelijk en is virus vrij.
Ik raad je wel aan om altijd een backup te maken van je master en slave file voor je gaat testen met mijn code, want tja, ik blijf een hobby programmeur.
Als je Mediafire niet vertrouwt kan ik je de zipfile ook mailen, DM me dan.
[ Bericht 46% gewijzigd door #ANONIEM op 07-02-2012 20:10:51 ]
Ik heb macro's verwijderd uit mijn spreadsheet.
Echter bij opstarten meld Excel "deze sheet bevat macro's"...
Wat ben ik vergeten?
Echter bij opstarten meld Excel "deze sheet bevat macro's"...
Wat ben ik vergeten?
Opgeslagen als .xlsm?quote:
Ik heb macro's verwijderd uit mijn spreadsheet.
Echter bij opstarten meld Excel "deze sheet bevat macro's"...
Wat ben ik vergeten?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
[i]What would life be like without rhethorical questions?[/i]
Fixel, was mijn oplossing wat je wilde?
[ Bericht 22% gewijzigd door #ANONIEM op 08-02-2012 17:30:40 ]
[ Bericht 22% gewijzigd door #ANONIEM op 08-02-2012 17:30:40 ]
Heb nog een oudere Excel 2003.... dus nog gewoon XLSquote:
Hoe kom ik van die macro melding af als ik geen macro in de sheet meen te hebben?
Dan zou het opgeslagen kunnen zijn als .xlm, maar ik zie dat t al opgelost isquote:
[..]
Heb nog een oudere Excel 2003.... dus nog gewoon XLS
Hoe kom ik van die macro melding af als ik geen macro in de sheet meen te hebben?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
[i]What would life be like without rhethorical questions?[/i]
En daar is ze weer met een domme vraag! 
Dat van die taal vergeet ik ff het liefst zo snel mogelijk 
Excel 20110 NL
Ok...ik heb een hele lijst met adressen/locaties van rioolgemaaltjes (meer dan 600) een aantal van die adressen uit de lijst zijn hoofdgemalen. Deze lijst staat op de tab 'installaties'
Nu is het zo dat ik elke maand een export doe uit ons storingssysteem, dan krijg ik dus een hele lijst met storingen die voorgevallen zijn aan de verschillende installaties. Die lijst komt op de eerste tab, waarna ik eruit ga filteren welke storingen verrekenbaar zijn.
Momenteel filter ik dus handmatig dmv de zoekfunctie welke gemalen uit die lijst de hoofdgemalen zijn (want dat is een andere verrekenprijs) en maak de cel lichtrood. Een heel werk
Kan ik in de kolom van tab 1 waar de adressen staan een soort voorwaardelijke opmaak instellen zodat hij meteen de adressen van de hoofdgemalen herkent en de cel lichtrood maakt?
Dat van die taal vergeet ik ff het liefst zo snel mogelijk Excel 20110 NL
Ok...ik heb een hele lijst met adressen/locaties van rioolgemaaltjes (meer dan 600) een aantal van die adressen uit de lijst zijn hoofdgemalen. Deze lijst staat op de tab 'installaties'
Nu is het zo dat ik elke maand een export doe uit ons storingssysteem, dan krijg ik dus een hele lijst met storingen die voorgevallen zijn aan de verschillende installaties. Die lijst komt op de eerste tab, waarna ik eruit ga filteren welke storingen verrekenbaar zijn.
Momenteel filter ik dus handmatig dmv de zoekfunctie welke gemalen uit die lijst de hoofdgemalen zijn (want dat is een andere verrekenprijs) en maak de cel lichtrood. Een heel werk
Kan ik in de kolom van tab 1 waar de adressen staan een soort voorwaardelijke opmaak instellen zodat hij meteen de adressen van de hoofdgemalen herkent en de cel lichtrood maakt?
Hey! Het is OK om alleen je eerste twee teennagels te lakken als je van plan bent peeptoes te gaan dragen!
Stel lokatie van storing staat in cel A2
De lijst met hoofdgemaallocaties staat op tabblad "gemaal" cellen A2:A20.
met deze formule:
=IF(ISERROR(VLOOKUP(A2,gemaal!$A$2:$A$20,1,FALSE)),"","X")
In het NL =ALS(ISFOUT(VERT.ZOEKEN(A2;gemaal!$A$2:$A$20;1;ONWAAR));"";"X")
bepaal je of de locatie in A2 een hoofdgemaal is. Zo ja dan komt er in de cel een X te staan zo nee dan komt er niks te staan.
De "" en "X" kun je naar believen veranderen in een functie of waarde, bijvoorbeeld de verrekenprijs
De lijst met hoofdgemaallocaties staat op tabblad "gemaal" cellen A2:A20.
met deze formule:
=IF(ISERROR(VLOOKUP(A2,gemaal!$A$2:$A$20,1,FALSE)),"","X")
In het NL =ALS(ISFOUT(VERT.ZOEKEN(A2;gemaal!$A$2:$A$20;1;ONWAAR));"";"X")
bepaal je of de locatie in A2 een hoofdgemaal is. Zo ja dan komt er in de cel een X te staan zo nee dan komt er niks te staan.
De "" en "X" kun je naar believen veranderen in een functie of waarde, bijvoorbeeld de verrekenprijs
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Hoihoi,
Ik heb een vraag over het kopieren van een tabblad. Ik heb een sheet met daarin een overzicht van een aantal medewerkers en een aantal 'template'-sheets voor elk functieprofiel. Ik wil nu met een druk op de knop voor alle medewerkers in de lijst een eigen tabblad aanmaken, gebaseerd op hun functieprofiel. Er wordt dus gekeken naar welk functieprofiel in de lijst staat en aan de hand daarvan wordt bepaald van welke 'template'-sheet er een kopie moet worden gemaakt.
Ik heb beovenstaande functionaliteit gebouwd mbv VBA en op zich gaat dat goed. Voor elke medewerker wordt een juist tabblad aangemaakt. Ik zi nu alleen dat het mis gaat bij het printen van deze tabbladen. Bij het kopieren van de template-sheet wordt wel netjes de info uit de sheet meegenomen (tekst, kolombreedtes, gekleurde cellen e.d), maar niet de pagina-instellingen (schaal, marges kop/voettekst e.d).
Mijn vraag is dus: Hoe kan ik mbv VBA een sheet zodanig kopieren dat ook de pagina-instellingen worden meegenomen?
Wat ik nu doe is eerste een nieuw, leeg tabblad aanmaken (Worksheets.Add) en dan de template daarheen copy-pasten. En daarbij gaat het blijkbaar mis, want de sheet krijgt dan de pagina-instellingen van een nieuwe, lege sheet en niet die van de kopieer-bron...
Ik heb een vraag over het kopieren van een tabblad. Ik heb een sheet met daarin een overzicht van een aantal medewerkers en een aantal 'template'-sheets voor elk functieprofiel. Ik wil nu met een druk op de knop voor alle medewerkers in de lijst een eigen tabblad aanmaken, gebaseerd op hun functieprofiel. Er wordt dus gekeken naar welk functieprofiel in de lijst staat en aan de hand daarvan wordt bepaald van welke 'template'-sheet er een kopie moet worden gemaakt.
Ik heb beovenstaande functionaliteit gebouwd mbv VBA en op zich gaat dat goed. Voor elke medewerker wordt een juist tabblad aangemaakt. Ik zi nu alleen dat het mis gaat bij het printen van deze tabbladen. Bij het kopieren van de template-sheet wordt wel netjes de info uit de sheet meegenomen (tekst, kolombreedtes, gekleurde cellen e.d), maar niet de pagina-instellingen (schaal, marges kop/voettekst e.d).
Mijn vraag is dus: Hoe kan ik mbv VBA een sheet zodanig kopieren dat ook de pagina-instellingen worden meegenomen?
Wat ik nu doe is eerste een nieuw, leeg tabblad aanmaken (Worksheets.Add) en dan de template daarheen copy-pasten. En daarbij gaat het blijkbaar mis, want de sheet krijgt dan de pagina-instellingen van een nieuwe, lege sheet en niet die van de kopieer-bron...
quote:
Hoihoi,
Ik heb een vraag over het kopieren van een tabblad. Ik heb een sheet met daarin een overzicht van een aantal medewerkers en een aantal 'template'-sheets voor elk functieprofiel. Ik wil nu met een druk op de knop voor alle medewerkers in de lijst een eigen tabblad aanmaken, gebaseerd op hun functieprofiel. Er wordt dus gekeken naar welk functieprofiel in de lijst staat en aan de hand daarvan wordt bepaald van welke 'template'-sheet er een kopie moet worden gemaakt.
Ik heb beovenstaande functionaliteit gebouwd mbv VBA en op zich gaat dat goed. Voor elke medewerker wordt een juist tabblad aangemaakt. Ik zi nu alleen dat het mis gaat bij het printen van deze tabbladen. Bij het kopieren van de template-sheet wordt wel netjes de info uit de sheet meegenomen (tekst, kolombreedtes, gekleurde cellen e.d), maar niet de pagina-instellingen (schaal, marges kop/voettekst e.d).
Mijn vraag is dus: Hoe kan ik mbv VBA een sheet zodanig kopieren dat ook de pagina-instellingen worden meegenomen?
Wat ik nu doe is eerste een nieuw, leeg tabblad aanmaken (Worksheets.Add) en dan de template daarheen copy-pasten. En daarbij gaat het blijkbaar mis, want de sheet krijgt dan de pagina-instellingen van een nieuwe, lege sheet en niet die van de kopieer-bron...
| 1 | sheet.Copy([before], [after]); |
Ik heb het volgende 'probleem':
In kolom C heb ik de namen van producten staan en in kolom H staat bij een gedeelte van deze producten de prijs. Bijvoorbeeld in cel C2 staat het product 'Measuring jug' in cel H2 staat de prijs van 4,60. Dit is prima.
Het probleem is echter dat in bijvoorbeeld C211 ook het product 'Measuring jug' staat maar de cel H211 is leeg.
Kan ik het niet zo instellen dat bij het invullen van 'Measuring jug' in cel C211 de prijs van 4,60 automatisch in cel H211 komt?
Hopelijk kan iemand mij helpen.
In kolom C heb ik de namen van producten staan en in kolom H staat bij een gedeelte van deze producten de prijs. Bijvoorbeeld in cel C2 staat het product 'Measuring jug' in cel H2 staat de prijs van 4,60. Dit is prima.
Het probleem is echter dat in bijvoorbeeld C211 ook het product 'Measuring jug' staat maar de cel H211 is leeg.
Kan ik het niet zo instellen dat bij het invullen van 'Measuring jug' in cel C211 de prijs van 4,60 automatisch in cel H211 komt?
Hopelijk kan iemand mij helpen.
Ken je de functie vert.zoeken()?quote:
Ik heb het volgende 'probleem':
In kolom C heb ik de namen van producten staan en in kolom H staat bij een gedeelte van deze producten de prijs. Bijvoorbeeld in cel C2 staat het product 'Measuring jug' in cel H2 staat de prijs van 4,60. Dit is prima.
Het probleem is echter dat in bijvoorbeeld C211 ook het product 'Measuring jug' staat maar de cel H211 is leeg.
Kan ik het niet zo instellen dat bij het invullen van 'Measuring jug' in cel C211 de prijs van 4,60 automatisch in cel H211 komt?
Hopelijk kan iemand mij helpen.
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
[i]What would life be like without rhethorical questions?[/i]
Ik exporteer een deel van een Excel blad met onderstaande VBA naar een csv-file.
Gevonden op internet, en werkt goed.
Toch ben ik over een ding niet tevreden. In deze export-VBA zit ingebakken een vaste plaats op de harde schijf... in dit geval: C:\Users\Elkravo\Desktop\File.csv
Is deze opdracht te vervangen door iets waarbij ik zelf een plaats kan aanwijzen in het proces.
Deze vraag is ingegeven door het feit dat meerdere personen het sheet op eigen computer gebruiken, en dus de macro niet te specifiek een locatie moet aanwijzen.
[ Bericht 97% gewijzigd door elkravo op 10-02-2012 23:09:45 ]
Gevonden op internet, en werkt goed.
Toch ben ik over een ding niet tevreden. In deze export-VBA zit ingebakken een vaste plaats op de harde schijf... in dit geval: C:\Users\Elkravo\Desktop\File.csv
Is deze opdracht te vervangen door iets waarbij ik zelf een plaats kan aanwijzen in het proces.
Deze vraag is ingegeven door het feit dat meerdere personen het sheet op eigen computer gebruiken, en dus de macro niet te specifiek een locatie moet aanwijzen.
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | Sub export() ' ' export Macro Range("A1:E50").Select Selection.Copy Workbooks.Add ActiveSheet.Paste ActiveWorkbook.SaveAs Filename:= _ "C:\Users\Elkravo\Desktop\File.csv" _ , FileFormat:=xlCSV, CreateBackup:=False Application.DisplayAlerts = False ActiveWorkbook.Close Application.DisplayAlerts = True End Sub |
[ Bericht 97% gewijzigd door elkravo op 10-02-2012 23:09:45 ]
saveas = stringwaarde
Stringwaarde in simpel userform vragen
Je kan ook naar de directory browsen en de stringwaarde opbouwen als
stringwaarde = newdir & "Filename"
Of gewoon gebruiken wat er al is :
Je kan eventueel ook gebruik maken van het pad ThisWorkbook.path & "\" & "NAAM"
Als je echter een Add-In gebruikt voor de code verwijst ThisWorkbook naar het pad van de Add-In en kun je beter ActiveWorkbook.path gebruiken
[ Bericht 9% gewijzigd door #ANONIEM op 11-02-2012 08:59:22 ]
Stringwaarde in simpel userform vragen
Je kan ook naar de directory browsen en de stringwaarde opbouwen als
stringwaarde = newdir & "Filename"
Of gewoon gebruiken wat er al is
:| 1 2 3 | fileSaveName = Application.GetSaveAsFilename( _ fileFilter:="csv Files (*.csv), *.csv") ActiveWorkbook.SaveAs (fileSaveName) |
Je kan eventueel ook gebruik maken van het pad ThisWorkbook.path & "\" & "NAAM"
Als je echter een Add-In gebruikt voor de code verwijst ThisWorkbook naar het pad van de Add-In en kun je beter ActiveWorkbook.path gebruiken
[ Bericht 9% gewijzigd door #ANONIEM op 11-02-2012 08:59:22 ]
Hoi KM, alvast bedankt, maar ik krijg het niet helemaal voor elkaar.quote:Op zaterdag 11 februari 2012 07:25 schreef KritischeMassa het volgende:
saveas = stringwaarde
Stringwaarde in simpel userform vragen
Je kan ook naar de directory browsen en de stringwaarde opbouwen als
stringwaarde = newdir & "Filename"
Of gewoon gebruiken wat er al is
[ code verwijderd ]
Je kan eventueel ook gebruik maken van het pad ThisWorkbook.path & "\" & "NAAM"
Als je echter een Add-In gebruikt voor de code verwijst ThisWorkbook naar het pad van de Add-In en kun je beter ActiveWorkbook.path gebruiken
Ik geef de voorkeur aan jouw code (waarbij dus een opslaan-als scherm wordt gebruikt)... alleen die moet ik integreren in mijn bestaande code.
Dit lukt mij niet (hij maakt een False.xls) ... want ik weet niet precies hoe die dingen in elkaar moeten geflansd worden. Ben echt een VBA newbie (leek)...
| 1 2 3 4 5 6 7 8 9 10 11 | Sub export() ' 'export Macro Range("A1:E50").Copy Workbooks.Add ActiveSheet.Paste fileSaveName = Application.GetSaveAsFilename(fileFilter:="csv Files (*.csv), *.csv") ActiveWorkbook.SaveAs (fileSaveName) Application.DisplayAlerts = False ActiveWorkbook.Close Application.DisplayAlerts = True End Sub |
Als er geen bestandsnaam wordt gesuggereerd en je geeft niets op krijg je idd FALSE terug
dat kun je zo ondervangen:
| 1 2 3 4 5 6 7 8 9 10 11 12 | Sub export() ' 'export Macro Range("A1:E50").Copy Workbooks.Add ActiveSheet.Paste fileSaveName = Application.GetSaveAsFilename(fileFilter:="csv Files (*.csv), *.csv") If fileSaveName = False Then Exit Sub ActiveWorkbook.SaveAs (fileSaveName) Application.DisplayAlerts = False ActiveWorkbook.Close Application.DisplayAlerts = True End Sub |
[ Bericht 34% gewijzigd door #ANONIEM op 11-02-2012 14:04:56 ]
Hoi KM,quote:Op zaterdag 11 februari 2012 13:57 schreef KritischeMassa het volgende:
[ code verwijderd ]
Als er geen bestandsnaam wordt gesuggereerd en je geeft niets op krijg je idd FALSE terug
dat kun je zo ondervangen:
[ code verwijderd ]
Heb de tweede gedaan...
Hij vraagt om een naam, geeft CSV type aan. Echter, het resultaat is FALSE.xls ipv mijnnaam.csv
FALSE.xls is ook niet in csv format (te zien als ik deze open met kladblok).
Wat gek, ik heb het getest in een willekruige sheet en daar werkte het gewoonquote:
[..]
Hoi KM,
Heb de tweede gedaan...
Hij vraagt om een naam, geeft CSV type aan. Echter, het resultaat is FALSE.xls ipv mijnnaam.csv
FALSE.xls is ook niet in csv format (te zien als ik deze open met kladblok).
wat geeft een msgbox met de string erin?
dus zo:
| 1 2 3 | If fileSaveName = False Then Exit Sub msgbox filesavename ActiveWorkbook.SaveAs (fileSaveName) |
Hoi, ik zie geen verschil::quote:
[..]
Wat gek, ik heb het getest in een willekruige sheet en daar werkte het gewoon
wat geeft een msgbox met de string erin?
dus zo:
[ code verwijderd ]
Wat nu gebeurt is...
Er wordt een nieuw excel-map gemaakt, en ik krijg deze pop-up:
Vervolgens zet ik er een nieuwe naam in... maar wordt het blad toch als FALSE.xls bewaard.
In de oorspronkelijke code staat o.a.:
| 1 | , FileFormat:=xlCSV, |
mist dit op een of andere manier niet?
Je had een messagebox moeten krijgen met het pad en de filenaamquote:
[..]
Hoi, ik zie geen verschil::
Wat nu gebeurt is...
Er wordt een nieuw excel-map gemaakt, en ik krijg deze pop-up:
[ afbeelding ]
Vervolgens zet ik er een nieuwe naam in... maar wordt het blad toch als FALSE.xls bewaard.
In de oorspronkelijke code staat o.a.:
[ code verwijderd ]
mist dit op een of andere manier niet?
Zet die hele code nu eens in een nieuwe sheet en test het vanaf daar (opgeslagen en wel)
En nee , je geeft het filetype immers al op in het dialoog
hier de sheet die ik heb
In de bovenstaande sheet draai de macro "export"
[ Bericht 7% gewijzigd door #ANONIEM op 11-02-2012 19:52:05 ]
Ok, de vba uit jouw file gebruikt... de file creatie werkt nu wel. Dank.quote:
[..]
Je had een messagebox moeten krijgen met het pad en de filenaam
Zet die hele code nu eens in een nieuwe sheet en test het vanaf daar (opgeslagen en wel)
En nee , je geeft het filetype immers al op in het dialoog
hier de sheet die ik heb
In de bovenstaande sheet draai de macro "export"
Alleen lijkt de format van de geëxporteerde file "intern" niet "comma separated".
Als ik de file open in kladblok verwacht ik (uit jouw file)
| 1 2 3 4 5 | 1;2;3;4;5 q;q;q;q;q w;w;w;w;w 2;3;4;5;6 etc |
Maar de uitkomst van de export maakt dit niet, bij openen in kladblok zie ik allerlei rare tekens, dus ik denk dat het toch nog op een of andere manier intern nog xls-format is of zo...
Ok, we komen verder iigquote:
[..]
Ok, de vba uit jouw file gebruikt... de file creatie werkt nu wel. Dank.
Alleen lijkt de format van de geëxporteerde file "intern" niet "comma separated".
Als ik de file open in kladblok verwacht ik (uit jouw file)
[ code verwijderd ]
Maar de uitkomst van de export maakt dit niet, bij openen in kladblok zie ik allerlei rare tekens, dus ik denk dat het toch nog op een of andere manier intern nog xls-format is of zo...
dus het is geen csv als gehoopt...
hmmm
| 1 | ActiveWorkbook.SaveAs Filename:=filesavename, FileFormat:=xlCSV, CreateBackup:=False |
en zo?
That was the missing piece!quote:
[..]
Ok, we komen verder iig
dus het is geen csv als gehoopt...
hmmm
[ code verwijderd ]
en zo?
Hij doet 't!KM ik ben je enorm dankbaar!
En ik heb weer nieuwe dingen geleerd ook zo, waarvoor ook dank!
Ik was met opzet vrij cryptisch in mijn antwoorden, je was al zo lekker op wegquote:Op zaterdag 11 februari 2012 20:28 schreef elkravo het volgende:
[..]
That was the missing piece!
KM ik ben je enorm dankbaar!
En ik heb weer nieuwe dingen geleerd ook zo, waarvoor ook dank!
Heb je gezien dat ik je "select" actie heb weggehaald in jouw code?
Als je gebruik maakt van macro opnemen zitten er een hoop select acties in, die zijn helemaal niet nodig en laten het scherm flikkeren. Je kan vrij direct ranges aanwijzen en manipuleren namelijk.
Hah nee dat was me niet opgevallen. Maar goed als ik die codes zie snap ik een en ander, en veel ook weer niet. Weet niet waar mensen dit soort spul leren, maar dit moet je dus gewoon leren, en lezen, het is niet altijd redeneerbaar. Lijkt me bij computertaal in het algemeen het geval.quote:
[..]
Ik was met opzet vrij cryptisch in mijn antwoorden, je was al zo lekker op weg
Heb je gezien dat ik je "select" actie heb weggehaald in jouw code?
Als je gebruik maakt van macro opnemen zitten er een hoop select acties in, die zijn helemaal niet nodig en laten het scherm flikkeren. Je kan vrij direct ranges aanwijzen en manipuleren namelijk.
Basic is in al zijn vormen een bitchquote:
[..]
Hah nee dat was me niet opgevallen. Maar goed als ik die codes zie snap ik een en ander, en veel ook weer niet. Weet niet waar mensen dit soort spul leren, maar dit moet je dus gewoon leren, en lezen, het is niet altijd redeneerbaar. Lijkt me bij computertaal in het algemeen het geval.
Leer C en vandaar uit andere talen, dan snap je wat meer en kun je wat meer apparatuur programmeren (ik ben vrij beroemd in de casio rekenmachine cultuur, ik heb zelfs simcity, pacman en pool geport naar de casio grafische calculator (nerd
))
yep klinkt nerdy ... maar ieder zijn ding ...zolang je er maar plezier in hebt!
Nog even een andere vraag:
In een macro heb ik deze selectie (zie hoe ik geleerd heb zonder te selecten )
In deze range staat dus een tabel te kopieren.
Echter... het kan zijn dat door ergens boven in de sheet een rij te verwijderen dat de macro dus niet meedenkt dat het dan
moet worden
OF
Het kan zijn dat er een rij uit de range wordt verwijderd en dat de macro dus niet meedenkt dat het dan
moet worden.
Ik denk dat een manier moet zijn om dit te ondervangen door voor de eerste cel , en na de laatste cel een markeringspunt (een unieke term "SelecteerStart" en "SelecteerEinde") te zetten, en de macro dus tussen deze twee markeringspunten te selecteren.
Geen idee hoe dat dan weer moet... idee?
... maar ieder zijn ding ...zolang je er maar plezier in hebt!Nog even een andere vraag:
In een macro heb ik deze selectie (zie hoe ik geleerd heb zonder te selecten
)| 1 | Range("I87:M138").Copy |
In deze range staat dus een tabel te kopieren.
Echter... het kan zijn dat door ergens boven in de sheet een rij te verwijderen dat de macro dus niet meedenkt dat het dan
| 1 | Range("I86:M137").Copy |
OF
Het kan zijn dat er een rij uit de range wordt verwijderd en dat de macro dus niet meedenkt dat het dan
| 1 | Range("I87:M137").Copy |
Ik denk dat een manier moet zijn om dit te ondervangen door voor de eerste cel , en na de laatste cel een markeringspunt (een unieke term "SelecteerStart" en "SelecteerEinde") te zetten, en de macro dus tussen deze twee markeringspunten te selecteren.
Geen idee hoe dat dan weer moet... idee?
Ja hoor
Je kan range en cells combineren
Cells kun je tellen -> Cells(i,j)
Door nu door de kolom heen te lopen kun je het start en einde van de range detecteren
pseudocode
For i = 1 to 32000
if cells(i,1)= "start" then
SelStart = i
end if
if cells(i,1) = "einde" then
SelEnd = i
exit for
end if
next
Nu weet je het begin en het eind
nu kun je de range specificeren
range(cells(StartSel,1),cells(EndSel,8))
de 1 en de 8 slaan op de kolomnummers
edit:
Dit gaat natuurlijk grandioos de mist in als je de regel met start of einde verwijderd
kun je niet beter de gebruiker de range laten selecteren met inputbox type 8? (zie post #4 in dit topic voor een voorbeeld)
[ Bericht 3% gewijzigd door #ANONIEM op 12-02-2012 19:38:58 ]
Je kan range en cells combineren
Cells kun je tellen -> Cells(i,j)
Door nu door de kolom heen te lopen kun je het start en einde van de range detecteren
pseudocode
For i = 1 to 32000
if cells(i,1)= "start" then
SelStart = i
end if
if cells(i,1) = "einde" then
SelEnd = i
exit for
end if
next
Nu weet je het begin en het eind
nu kun je de range specificeren
range(cells(StartSel,1),cells(EndSel,8))
de 1 en de 8 slaan op de kolomnummers
edit:
Dit gaat natuurlijk grandioos de mist in als je de regel met start of einde verwijderd
kun je niet beter de gebruiker de range laten selecteren met inputbox type 8? (zie post #4 in dit topic voor een voorbeeld)
[ Bericht 3% gewijzigd door #ANONIEM op 12-02-2012 19:38:58 ]
Ik vind jouw beschreven optie goed, ik wil dat een gebruiker niets hoeft te doen. En die regels met start en einde gaan niet weg.quote:
Ja hoor
Je kan range en cells combineren
Cells kun je tellen -> Cells(i,j)
Door nu door de kolom heen te lopen kun je het start en einde van de range detecteren
pseudocode
For i = 1 to 32000
if cells(i,1)= "start" then
SelStart = i
end if
if cells(i,1) = "einde" then
SelEnd = i
exit for
end if
next
Nu weet je het begin en het eind
nu kun je de range specificeren
range(cells(StartSel,1),cells(EndSel,8))
de 1 en de 8 slaan op de kolomnummers
edit:
Dit gaat natuurlijk grandioos de mist in als je de regel met start of einde verwijderd
kun je niet beter de gebruiker de range laten selecteren met inputbox type 8? (zie post #4 in dit topic voor een voorbeeld)
Echter... ik mis een bruggetje...hoe ik van
range(cells(StartSel,1),cells(EndSel,8)) ....naar het kopieren van deze range kom. '. copy' erachter zetten werkt niet.
edit: ik blijf een compileerfout krijgen op:
Range(Cells(StartSel, 1), Cells(EndSel, 9))
(ook als ik over StartSel en EndSel gebruik en niet SelStart hier en SelEnd
)[ Bericht 5% gewijzigd door elkravo op 12-02-2012 20:29:52 ]
^^^
Ben er zelf uitgekomen... en het werkt.... moest me even suf googlen ;-)
Maar bedankt voor de voorzet KM!
Ben er zelf uitgekomen... en het werkt.... moest me even suf googlen ;-)
Maar bedankt voor de voorzet KM!
haha dat was grappig hequote:
(ook als ik over StartSel en EndSel gebruik en niet SelStart hier en SelEnd
(gebeurt me regelmatig, en dan zoek ik me suf wat er nou mis is En ja ik moet eigenlijk de code eerst testen in excel want ik weet de syntax altijd ongeveer een beetje
maar ik had het druk gisteravond
en zelf uitvinden is tig keer leerzaam dan overtypenvandaar de disclaimer "pseudocode"
Edit:
Om grappen als hierboven te voorkomen kun je "option Explicit" boven je code zetten (eerste regel)
Dit dwingt je om elke Variabel te declareren (dus ook teller i etc)
Als een variabel niet is gedeclareerd stopt de code daar
Zo voorkom je dat een typefout door VBA wordt geïnterpreteerd als een nieuwe variabel
[ Bericht 13% gewijzigd door #ANONIEM op 13-02-2012 06:34:21 ]
quote:
Hi, ik zit met een uitdaging in Excel.
Stel ik wil dagelijks bijhouden in welk merk auto ik rijd en voer dat als volgt in :
[ afbeelding ]
Met de knop ' toevoegen aan lijst' wil ik dat een lijst wordt aangevuld, dat ziet er dan zo uit :
[ afbeelding ]
Hoe moet ik die knop programmeren? Is daar een formule voor, of moet ik met VB gaan werken, of kan ik eventueel met een macro werken? En hoe doe ik dat?
eeuwige roem voor degene die me hiermee kan helpen!
thx
Een macro is VBA
En als je met een knop wil werken zit je vast aan VBA
Ik zou het met een userform oplossen denk ik, al snap ik de vraag niet helemaal
Maak een userform met drie tekstvakken
zet hiervoor drie labels:
Datum
Merk
Kleur
Het tekstvak datum kun je zelfs als "datepicker"opmaken ,maar dan moet je dat extra besturingselement wel in VBA toevoegen...
weet je, ik voeg zometeen een sheet toe die doet wat je wil, want dit gaat me teveel typwerk kosten en ik vermoed dat je geen idee hebt waar ik het over heb, niet onaardig bedoeld
En als je met een knop wil werken zit je vast aan VBA
Ik zou het met een userform oplossen denk ik, al snap ik de vraag niet helemaal
Maak een userform met drie tekstvakken
zet hiervoor drie labels:
Datum
Merk
Kleur
Het tekstvak datum kun je zelfs als "datepicker"opmaken ,maar dan moet je dat extra besturingselement wel in VBA toevoegen...
weet je, ik voeg zometeen een sheet toe die doet wat je wil, want dit gaat me teveel typwerk kosten en ik vermoed dat je geen idee hebt waar ik het over heb, niet onaardig bedoeld
De sheet
Er zit een userform in die opgeroepen wordt via de knop in de sheet
In het userform een datepicker voor de datum, twee tekstvakken en twee knoppen (annuleer en opslaan)
Achter de knop opslaan zit de volgende code
Als je wil dat er niets wordt opgeslagen als het merk of de kleur niet is ingevevuld moet je zelf de code aanpassen
Iets met If textbox1="" then exit sub of zoiets
Ik daag je uit om de code aan te passen, zoals je waarschijnlijk snapt...
Er zit een userform in die opgeroepen wordt via de knop in de sheet
In het userform een datepicker voor de datum, twee tekstvakken en twee knoppen (annuleer en opslaan)
Achter de knop opslaan zit de volgende code
| 1 2 3 4 5 6 7 8 9 10 11 12 13 | For i = 1 To 3200 'Kijken welke regel leeg is 'Uitgaande van de datum kolom If ActiveWorkbook.ActiveSheet.Cells(i, 1) = "" Then Exit For Next 'elke ingevoerde waarde in het formulier wordt in de sheet geplaatst ActiveWorkbook.ActiveSheet.Cells(i, 1) = DTPicker1.Value ActiveWorkbook.ActiveSheet.Cells(i, 2) = TextBox1.Value ActiveWorkbook.ActiveSheet.Cells(i, 3) = TextBox2.Value 'userform sluiten Unload Me |
Als je wil dat er niets wordt opgeslagen als het merk of de kleur niet is ingevevuld moet je zelf de code aanpassen
Iets met If textbox1="" then exit sub of zoiets
Ik daag je uit om de code aan te passen, zoals je waarschijnlijk snapt
...
@kritische massa : ik ga het proberen! Ik werk veel met macro's maar voorkom altijd net dat ik zelf code moet gaan typen. ;-) Thx!
iemand een idee?
Ik heb een sheet met 52 tabbladen (voor iedere week 1).
In zo'n tabblad staat in kolom A de naam van een medewerker en in kolom B tot en met L komt wel of geen "x" om bij te houden of iemand wel of niet in die week gecoacht is.
Nu wil ik een "overzichtspagina" hebben, waar ik in kolom A de naam van de medewerker heb staan en in kolom B (week 1) tot en met BA (week 52) het aantal "x" per medewerker voor de betreffende week.
Een aantal.arg per tabblad zou kunnen... als we iedere week dezelfde medewerkers zouden hebben. En dat is niet per definitie zo
Iemand een idee hoe ik een formule of macro kan gebruiken die kijkt naar de naam van de medewerker en dan per tabblad het aantal x-jes van die medewerker telt
Ik heb een sheet met 52 tabbladen (voor iedere week 1).
In zo'n tabblad staat in kolom A de naam van een medewerker en in kolom B tot en met L komt wel of geen "x" om bij te houden of iemand wel of niet in die week gecoacht is.
Nu wil ik een "overzichtspagina" hebben, waar ik in kolom A de naam van de medewerker heb staan en in kolom B (week 1) tot en met BA (week 52) het aantal "x" per medewerker voor de betreffende week.
Een aantal.arg per tabblad zou kunnen... als we iedere week dezelfde medewerkers zouden hebben. En dat is niet per definitie zo
Iemand een idee hoe ik een formule of macro kan gebruiken die kijkt naar de naam van de medewerker en dan per tabblad het aantal x-jes van die medewerker telt
If you wish to be a success in the world, promise everything, deliver nothing.
Nothing is more difficult, and therefore more precious, than to be able to decide.
Victory belongs to the most persevering
Nothing is more difficult, and therefore more precious, than to be able to decide.
Victory belongs to the most persevering
Aantal.als een idee?quote:
iemand een idee?
Ik heb een sheet met 52 tabbladen (voor iedere week 1).
In zo'n tabblad staat in kolom A de naam van een medewerker en in kolom B tot en met L komt wel of geen "x" om bij te houden of iemand wel of niet in die week gecoacht is.
Nu wil ik een "overzichtspagina" hebben, waar ik in kolom A de naam van de medewerker heb staan en in kolom B (week 1) tot en met BA (week 52) het aantal "x" per medewerker voor de betreffende week.
Een aantal.arg per tabblad zou kunnen... als we iedere week dezelfde medewerkers zouden hebben. En dat is niet per definitie zo
Iemand een idee hoe ik een formule of macro kan gebruiken die kijkt naar de naam van de medewerker en dan per tabblad het aantal x-jes van die medewerker telt
Macro kan ook
In dit topic zijn een aantal voorbeelden van code en tellers die je opweg kunnen helpen
| 1 2 3 | For i kan op cellen slaan maar ook op sheets (sheet(i)) Dan tellen in die sheets For j bijvoorbeeld Sheet(i).cells(j,1) Dan tellen in kolomen for k bijvoorbeeld sheet(i),cells(j,k) |
[ Bericht 14% gewijzigd door #ANONIEM op 13-02-2012 19:57:24 ]
Hi Kritische massa, ik had nog niet aan deze oplossing gedacht om te werken met een user form. Ik moet me toch eens bezig gaan houden met VB, voor de eerste keer programmeren in 15 jaar. Het zal niet meevallen. ;-) thx!
Google en KM zullen je helpenquote:
Hi Kritische massa, ik had nog niet aan deze oplossing gedacht om te werken met een user form. Ik moet me toch eens bezig gaan houden met VB, voor de eerste keer programmeren in 15 jaar. Het zal niet meevallen. ;-) thx!
met aantal.als loop ik er tegenaan dat ik óf de naam als criterium moet hanteren of de ingevulde "x" .quote:
macro knutselen dusquote:Macro kan ook
In dit topic zijn een aantal voorbeelden van code en tellers die je opweg kunnen helpen
[ code verwijderd ]
Probeer eens wat zou ik zeggen en als het echt niet lukt zie ik je hier vanzelf weer
If you wish to be a success in the world, promise everything, deliver nothing.
Nothing is more difficult, and therefore more precious, than to be able to decide.
Victory belongs to the most persevering
Nothing is more difficult, and therefore more precious, than to be able to decide.
Victory belongs to the most persevering
Combinatie van vert.zoeken() en aantal.als()quote:
iemand een idee?
Ik heb een sheet met 52 tabbladen (voor iedere week 1).
In zo'n tabblad staat in kolom A de naam van een medewerker en in kolom B tot en met L komt wel of geen "x" om bij te houden of iemand wel of niet in die week gecoacht is.
Nu wil ik een "overzichtspagina" hebben, waar ik in kolom A de naam van de medewerker heb staan en in kolom B (week 1) tot en met BA (week 52) het aantal "x" per medewerker voor de betreffende week.
Een aantal.arg per tabblad zou kunnen... als we iedere week dezelfde medewerkers zouden hebben. En dat is niet per definitie zo
Iemand een idee hoe ik een formule of macro kan gebruiken die kijkt naar de naam van de medewerker en dan per tabblad het aantal x-jes van die medewerker telt
En alweer een vraag.
Excel 2010 NL
Ik heb een optelsom van aantal gewerkte uren.
Dit is in totaal bijvoorbeeld 65.25 uren (dus 65 uren en een kwartier)
Dan moet er in een andere cel dus het aantal in uren en minuten komen.
dus cel A1 staat 65.25
In cel A2 moet dan komen 65:15
Google maakt mij niet veel wijzer want die willen er allemaal een tijdnotatie van maken, en dat moet het dus niet zijn.
Mijn dank is weer oneindig
Excel 2010 NL
Ik heb een optelsom van aantal gewerkte uren.
Dit is in totaal bijvoorbeeld 65.25 uren (dus 65 uren en een kwartier)
Dan moet er in een andere cel dus het aantal in uren en minuten komen.
dus cel A1 staat 65.25
In cel A2 moet dan komen 65:15
Google maakt mij niet veel wijzer want die willen er allemaal een tijdnotatie van maken, en dat moet het dus niet zijn.
Mijn dank is weer oneindig
Hey! Het is OK om alleen je eerste twee teennagels te lakken als je van plan bent peeptoes te gaan dragen!
Ik heb 'm al
formule gewoon ='NL Maarssen (Stichtse Vecht)'!G3/24
en dan de cel eigenschap [uu]:mm
ik dacht ik deel 'm ff
formule gewoon ='NL Maarssen (Stichtse Vecht)'!G3/24
en dan de cel eigenschap [uu]:mm
ik dacht ik deel 'm ff
Hey! Het is OK om alleen je eerste twee teennagels te lakken als je van plan bent peeptoes te gaan dragen!
Kan ook wel met formule: =INT(A1)&":"&60*(A1-INT(A1))quote:Op dinsdag 14 februari 2012 16:40 schreef Puckzzz het volgende:
Ik heb 'm al
formule gewoon ='NL Maarssen (Stichtse Vecht)'!G3/24
en dan de cel eigenschap [uu]:mm
ik dacht ik deel 'm ff
Dat is wel heel ingewikkeld vind je niet?quote:
[..]
Kan ook wel met formule: =INT(A1)&":"&60*(A1-INT(A1))
Wel grappig dat deze vraag voor de tweede keer van dezelfde user in dit deel voorkomt (zie post #29).
Of ging het nu om de opmaak >24 uur in [uu]?
nee, dat was toch iets anders. Dat zou de 24 uur niet overschrijden.quote:
[..]
Dat is wel heel ingewikkeld vind je niet?
Wel grappig dat deze vraag voor de tweede keer van dezelfde user in dit deel voorkomt (zie post #29).
Of ging het nu om de opmaak >24 uur in [uu]?
Hey! Het is OK om alleen je eerste twee teennagels te lakken als je van plan bent peeptoes te gaan dragen!
Doe eens 63.25 uur delen door 24 en dan opmaken als dd-mm-jjjj uu:mmquote:
[..]
nee, dat was toch iets anders. Dat zou de 24 uur niet overschrijden.
(aangepaste opmaak)Die blokhaken zorgen ervoor dat je geen dagen krijgt bij getallen groter dan 24 uur, wel handige feature die ik ook pas sinds kort ken.
maar delen door 24 is dé manier om decimaal om te zetten naar tijd
Ik heb een nieuwe vraag.
Ik heb een lijst met namen, deze namen komen allemaal voor in een andere (veel langere) lijst met namen. In de lange lijst hebben de namen een code erachter.
Is het mogelijk om deze code's automagisch te laten verschijnen achter de korte lijst?
bedankt!
Ik heb een lijst met namen, deze namen komen allemaal voor in een andere (veel langere) lijst met namen. In de lange lijst hebben de namen een code erachter.
Is het mogelijk om deze code's automagisch te laten verschijnen achter de korte lijst?
bedankt!
Zoek eens op de functie verticaal zoeken (VERT.ZOEKEN in NL versie VLOOKUP in EN versie). Staan meer dan genoeg voorbeelden van in deze topicreeks.
Beste Excel-specialisten,
Ik werk met Excel 2010 en ik zit met het volgende. Ik heb een veld dat er als volgt uit ziet:
01.01.2012 14:45:23
Dus het tijdstip en dag dat iets gebeurd is. Zo heb ik ruim 100.000 van dat soort velden onder elkaar.
De categorie staat nu op standaard. Hoe kan ik van zo'n veld een datumveld maken zonder tijd? Bestaat er een functie die die tijd eraf kan trimmen?
Hartelijk dank alvast!
Ik werk met Excel 2010 en ik zit met het volgende. Ik heb een veld dat er als volgt uit ziet:
01.01.2012 14:45:23
Dus het tijdstip en dag dat iets gebeurd is. Zo heb ik ruim 100.000 van dat soort velden onder elkaar.
De categorie staat nu op standaard. Hoe kan ik van zo'n veld een datumveld maken zonder tijd? Bestaat er een functie die die tijd eraf kan trimmen?
Hartelijk dank alvast!
Gaap Goals rulezzz!
Je kan de veldopmaak veranderen naar datum, werkt dat met deze opmaak? Anders de punten vervangen door "-"quote:
Beste Excel-specialisten,
Ik werk met Excel 2010 en ik zit met het volgende. Ik heb een veld dat er als volgt uit ziet:
01.01.2012 14:45:23
Dus het tijdstip en dag dat iets gebeurd is. Zo heb ik ruim 100.000 van dat soort velden onder elkaar.
De categorie staat nu op standaard. Hoe kan ik van zo'n veld een datumveld maken zonder tijd? Bestaat er een functie die die tijd eraf kan trimmen?
Hartelijk dank alvast!
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
[i]What would life be like without rhethorical questions?[/i]
als je het format naar "nummer" veranderd wordt het dan een getal?quote:
Beste Excel-specialisten,
Ik werk met Excel 2010 en ik zit met het volgende. Ik heb een veld dat er als volgt uit ziet:
01.01.2012 14:45:23
Dus het tijdstip en dag dat iets gebeurd is. Zo heb ik ruim 100.000 van dat soort velden onder elkaar.
De categorie staat nu op standaard. Hoe kan ik van zo'n veld een datumveld maken zonder tijd? Bestaat er een functie die die tijd eraf kan trimmen?
Hartelijk dank alvast!
Zo ja dan kun je de waarde gewoon naar beneden afronden op een geheel getal en dat weer als datum gebruiken.
En anders doe je:
=DATE(1*MID(A1,7,4),1*MID(A1,4,2),1*(LEFT(A1,2)))
=DATUM(1*DEEL(A1;7;4);1*DEEL(A1;4;2);1*(LINKS(A1;2)))
[ Bericht 3% gewijzigd door Deetch op 16-02-2012 09:54:17 ]
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Het is ook van de ene kant een makkelijk functie maar er zitten nog wat retricties aan wat sommige mensen zich niet realiseren.quote:
Typisch hoeveel vragen er zijn over VLOOKUP
Het vervelendste is als er dubbele gegevens in de zoekkolom staan, dan neemt hij maar de eerst gevonden waarde.
Hallo mensen, nee, als ik de categorie op getal zet, verandert er niets, ook visueel niet.
En de categorie op datum zetten laat ook niets anders zien. Categorie aangepast heb ik ook geprobeerd maar ook daar geen sjoegem.
En de categorie op datum zetten laat ook niets anders zien. Categorie aangepast heb ik ook geprobeerd maar ook daar geen sjoegem.
Gaap Goals rulezzz!
Ik zal de formule van Deetch eens proberen. Gewoon in B1 zetten, dus rechts naast A1 waar de te bewerken string in staat?
Gaap Goals rulezzz!
dan is het dus een tekst en kun je idd mijn formule gebruiken.quote:
Hallo mensen, nee, als ik de categorie op getal zet, verandert er niets, ook visueel niet.
En de categorie op datum zetten laat ook niets anders zien. Categorie aangepast heb ik ook geprobeerd maar ook daar geen sjoegem.
Een handige tip ten aanzien van datums: Een datum is in excel gewoon een getal waarbij het cijfers achter de komma het deel van een dag is. Dus 12:00 is 0.5.
Als je data dus echt als data hebt staan kun je deze gewoon van elkaar aftrekken en afronden etc.
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Ik kom deze datumnotatie vaak tegen in logfiles (durag/sick). Vervangen zoals ik aangaf zet het ook om naar datum/tijd.quote:
[..]
dan is het dus een tekst en kun je idd mijn formule gebruiken.
Een handige tip ten aanzien van datums: Een datum is in excel gewoon een getal waarbij het cijfers achter de komma het deel van een dag is. Dus 12:00 is 0.5.
Als je data dus echt als data hebt staan kun je deze gewoon van elkaar aftrekken en afronden etc.
KritischeMassa heeft inderdaad gelijk. Zoeken en vervangen werkt prima! Daarna met control 1 de categorie op datum zetten en je hebt een normaal datumveld. Wel moet ik even testen of dit echt goed werkt want ik moet er draaitabellen van maken waar voor mijn werk financiele dingen aanhangen.
Bedankt!
Bedankt!
Gaap Goals rulezzz!
klopt maar dan moet je dus elke keer je ruwe data aanpassen terwijl je op deze manier een formule hebt die met je ruwe data gewoon aan de slag gaat.quote:
KritischeMassa heeft inderdaad gelijk. Zoeken en vervangen werkt prima! Daarna met control 1 de categorie op datum zetten en je hebt een normaal datumveld. Wel moet ik even testen of dit echt goed werkt want ik moet er draaitabellen van maken waar voor mijn werk financiele dingen aanhangen.
Bedankt!
Verder verdwijnt het getal achter de komma niet als je van een datum tijd notatie alleen de datum laat zien via format. Dit kan vervelend zijn bij vlookup functies en misschien ook wel met draiabellen.
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Ach ik heb dat soort dingen in een importmacro gestopt, je kan er namelijk meteen integers vanmaken )hele dagen.quote:
[..]
klopt maar dan moet je dus elke keer je ruwe data aanpassen terwijl je op deze manier een formule hebt die met je ruwe data gewoon aan de slag gaat.
Verder verdwijnt het getal achter de komma niet als je van een datum tijd notatie alleen de datum laat zien via format. Dit kan vervelend zijn bij vlookup functies en misschien ook wel met draiabellen.
En als je persé een formule wil gebruiken zou ik kiezen voor
=INTEGER(SUBSTITUEREN(B5;".";"-"))
De `INTEGER` om alleen de datum over te houden
Zit wat eenvoudiger in elkaar
Ik zit met een probleempje. Ik wil twee ALS functies nesten, maar het lukt niet.
Ik heb nu dit staan : =ALS(E18="Boston";B26;B28;ALS(F18="Ja";B27;)).
Excel geeft dan de melding dat ik teveel argumenten heb gebruikt. Hoe los ik dit op ?
Ik heb nu dit staan : =ALS(E18="Boston";B26;B28;ALS(F18="Ja";B27;)).
Excel geeft dan de melding dat ik teveel argumenten heb gebruikt. Hoe los ik dit op ?
Himmelhoch jauchzend, zum Tode betrübt.
Glücklich allein, ist Herr Bok, die schiet. Boem.
Glücklich allein, ist Herr Bok, die schiet. Boem.
=ALS(E18="Boston";B26;ALS(F18="Ja";B27;B28)).quote:
Ik zit met een probleempje. Ik wil twee ALS functies nesten, maar het lukt niet.
Ik heb nu dit staan : =ALS(E18="Boston";B26;B28;ALS(F18="Ja";B27;)).
Excel geeft dan de melding dat ik teveel argumenten heb gebruikt. Hoe los ik dit op ?
- Ik heb het antwoord al ! -
[ Bericht 94% gewijzigd door OudeBok op 17-02-2012 20:23:10 ]
[ Bericht 94% gewijzigd door OudeBok op 17-02-2012 20:23:10 ]
Himmelhoch jauchzend, zum Tode betrübt.
Glücklich allein, ist Herr Bok, die schiet. Boem.
Glücklich allein, ist Herr Bok, die schiet. Boem.
KritischeMassa, moet ik jouw formule in cel B1 zetten als de te bewerken string in A1 staat?
Gaap Goals rulezzz!
Aan de ene kant wel, maar aan de andere kant, heb zelf wiskunde gestudeerd en heb niks met programmeren dus over het algemeen schud ik 9 van de 10 keer binnen een minuut wel een wiskundige oplossing uit mijn mouw, neemt niet weg dat het soms omslachtig is en soms weer enorm handig en efficientquote:
[..]
Dat is wel heel ingewikkeld vind je niet?
Wel grappig dat deze vraag voor de tweede keer van dezelfde user in dit deel voorkomt (zie post #29).
Of ging het nu om de opmaak >24 uur in [uu]?
