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.
Denk dat het wel lastig is, maar als je QB hebt gehad kom je een eind!
Ik heb ooit s een goed boek gehad, Sam on VBA oid?
Ik heb ooit s een goed boek gehad, Sam on VBA oid?
VBA is toch niet per se nodig?
Als het altijd bestandsnaamWEEKNUMMER.xls is en de cel die gelezen moet worden altijd D45 is (bijvoorbeeld) kan je dat toch ook met de standaard excel-functies maken?
Als het altijd bestandsnaamWEEKNUMMER.xls is en de cel die gelezen moet worden altijd D45 is (bijvoorbeeld) kan je dat toch ook met de standaard excel-functies maken?
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]
Hij zou met VBA door een map kunnen loopen en elk bestand uitlezen.quote:Om te beginnen wil ik de totalen van 6 verschillende Excel bestanden overzichtelijk weergeven in 1 Excel bestand. Deze 6 bestanden worden dagelijks automatisch aangeleverd en bestaan uit 1 tabblad met een paar honderd regels die zijn voorzien van een regelcode. De bestandsnaam van de 6 automatisch gegenereerde bestanden is iedere dag anders (naar datum).
Hoe krijg ik Excel nu zo ver, dat hij met 1 druk op de knop de totalen per regelcode uit de andere bestanden haalt en deze importeert? Moet ik dan met Macro’s gaan werken? En zo ja, wat is dan een goede manier om mijzelf dit eigen te maken?
Als jij 6 bladen hebt met 30 kolommen is het kutwerk om elke keer die formules aan te passen.
Maar ik ben zelf al niet zo'n fan van dit soort dingen bouwen, dus ik begin er niet aan
Dat is helaas niet het geval, kijk maar eens naar het bestand dat ik heb geupload.quote:Op maandag 7 december 2009 15:54 schreef qu63 het volgende:
en de cel die gelezen moet worden altijd D45 is (bijvoorbeeld) kan je dat toch ook met de standaard excel-functies maken?
Even een paar beginnetjes:
Ten eerste moeten alle benodigde bestanden geopend worden. Hiervoor maak je een klein macrotje.
Je start macro opnemen, opent de benodigde bestanden en kijkt hoe de code eruit ziet (Alt+F11)
Nu zie je als het goed is:
Om een datum in te voeren die je vervolgens aan je bestandnaamplakt voeg je een inputbox toe:
Dit doe je voor de code van het openen van de bestanden
vervolgens vervang je in de code voor het openen van bestanden elke keer de uitgeschreven filenaam door de variable file1, file2 etc etc
Nu testen en als het niet werkt of je er niet komt komt horen we het wel.
Vervolgens kun je in de geopende bestanden verticaal zoeken
In je verzamelsheet typ je in een cel (format als tekst) de datum zoals deze ook in de bronbestanden staat.
Vervolgens ga je verticaal zoeken maar gebruik je om de zoekrange aan te geven de functie INDIRECT.
Cel C1 kun je zelf samenvoegen door een combinatie van een tekststring en een andere cel (waar je datum in staat (bijv cel b1).
Voorbeeld. In B1 zet je 1
in C1 zet je dan als voorbeeld: ="[Book"&B1&"]Sheet1!$A$1:$B$8"
De formule =VLOOKUP("test",INDIRECT(C1),2,FALSE) geeft weer hetzelfde resultaat
Ten eerste moeten alle benodigde bestanden geopend worden. Hiervoor maak je een klein macrotje.
Je start macro opnemen, opent de benodigde bestanden en kijkt hoe de code eruit ziet (Alt+F11)
Nu zie je als het goed is:
| 1 2 3 4 5 | code om files te openen end sub |
Om een datum in te voeren die je vervolgens aan je bestandnaamplakt voeg je een inputbox toe:
Dit doe je voor de code van het openen van de bestanden
| 1 2 3 4 5 | vervolgens maak je zes variabelen file1 = "standaardnaam van bestand1" & datum & ".xls" file2 = ""standaardnaam van bestand2" & datum & ".xls" *** idem voor file3, file4, file5, file 6 |
vervolgens vervang je in de code voor het openen van bestanden elke keer de uitgeschreven filenaam door de variable file1, file2 etc etc
Nu testen en als het niet werkt of je er niet komt komt horen we het wel.
Vervolgens kun je in de geopende bestanden verticaal zoeken
In je verzamelsheet typ je in een cel (format als tekst) de datum zoals deze ook in de bronbestanden staat.
Vervolgens ga je verticaal zoeken maar gebruik je om de zoekrange aan te geven de functie INDIRECT.
| 1 2 3 4 5 6 | **** formule zoekt naar "test" in het bestand [Book1], sheet1 In cel C1 staat nu: [Book1]Sheet1!$A$1:$B$8 =VLOOKUP("test",INDIRECT(C1),2,FALSE) **** heeft hetzelfde resultaat als voorgaande |
Cel C1 kun je zelf samenvoegen door een combinatie van een tekststring en een andere cel (waar je datum in staat (bijv cel b1).
Voorbeeld. In B1 zet je 1
in C1 zet je dan als voorbeeld: ="[Book"&B1&"]Sheet1!$A$1:$B$8"
De formule =VLOOKUP("test",INDIRECT(C1),2,FALSE) geeft weer hetzelfde resultaat
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
Uit: heleboel labels in VBA leegmaken. (naam + #)
quote:Op dinsdag 8 december 2009 10:41 schreef Holy_Goat het volgende:
Hoi,
ik heb een stuk of 30 labels in een form (VBA, excel 2003),
met de naam label1 - label30. Arrays kunnen niet gemaakt worden in vba zover ik begrepen heb.
Is er nu wel een snelle manier om lbl 1-30 leeg te maken zonder 30 lines te hoeven typen?
HG
| 1 2 3 4 | sName = "label" & i Me.Controls(sName).Text = "" Next i |
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
Allereerst bedankt voor je hulp Deetch!quote:
Het eerste deel is me aardig gelukt. Ik probeer nu eerst om het werkend te krijgen met het andere bestand dat ik als voorbeeld gaf.
Mijn code ziet er nu dus zo uit:
| 1 2 3 4 5 6 7 | datum = InputBox("Geef datum in te voeren bestand:(ddmmjj)") FILE1 = "114_Q5_InterneRegelsWeek_excel_" & datum & "_H114.xls" ChDir "B:\P&O\H*******\Temp" Workbooks.Open Filename:=FILE1 Windows("Map1").Activate End Sub |
Het bestand waarvan ik de datum opgeef wordt dan geopend. Maar is het is het perse nodig dat de betreffende bestanden fysiek geopend worden? Mijn doel is om het eindresultaat dummy-proof te maken en dan werkt het niet mee dat er 6 bestanden open springen.
Maar nu het laatste stuk van de code die je poste... daar loop ik helemaal vast
(Ik gebruik hier trouwens ook de NL versie (2003) dus misschien dat er mee te maken heeft).Excel blijft mijn vert.zoeken formule incorrect vinden. Kan ik trouwens wel gebruik maken van vert.zoeken? Als je naar het bestand kijkt dat ik heb bijgevoegd, hebben heel veel regels dezelfde datum.
Voor de duidelijkheid: Ik zou graag willen dat alle regels van alle bestanden in die map aan de verzamelsheet worden toegevoegd. De regels uit het wekelijkse nieuwe bestand moeten met de klik op knop onderaan komen.
Of zijn dit allemaal een beetje te hoog gegrepen ambities voor een VBA-N00b
[ Bericht 3% gewijzigd door Harmvt op 08-12-2009 16:13:14 ]
Om te verticaal zoeken moeten de bestanden open staan. met vert.zoeken kun je idd maar een cel van 1 datum opzoeken.
Je wilt dus alle regels van een bepaalde datum toevoegen aan je overzichtssheet?
Of wil je alle regels van alle 6 sheets samenvoegen, zeg maar de zes sheets verzamelen tot 1 sheet?
Je wilt dus alle regels van een bepaalde datum toevoegen aan je overzichtssheet?
Of wil je alle regels van alle 6 sheets samenvoegen, zeg maar de zes sheets verzamelen tot 1 sheet?
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
Ok, vergeet even die 6 bestanden. Het eerste dat ik wil bewerkstelligen is om de gegevens uit dat bestand dat ik in bovenstaande posts heb geupload te verzamelen in 1 verzamelsheet. Dat met die 6 bestanden lijkt er erg op, maar is de volgende stap.
Bovengenoemd bestand krijg ik wekelijks toegestuurd en ik wil gewoon dat alle gegevens toegevoegd worden aan 1 verzamelsheet, zodat ik er vervolgens grafieken etc op los kan laten om trends te ontdekken.
Handmatig kopiëren en plakken zou het meest voor de hand liggend zijn, maar ik wil dit trucje dus voor nog meer doeleinden gaan gebruiken. Zoals dat met die 6 bestanden. Dit alles moet ook nog eens fool-proof zijn voor de mensen die er mee gaan werken.
Bovengenoemd bestand krijg ik wekelijks toegestuurd en ik wil gewoon dat alle gegevens toegevoegd worden aan 1 verzamelsheet, zodat ik er vervolgens grafieken etc op los kan laten om trends te ontdekken.
Handmatig kopiëren en plakken zou het meest voor de hand liggend zijn, maar ik wil dit trucje dus voor nog meer doeleinden gaan gebruiken. Zoals dat met die 6 bestanden. Dit alles moet ook nog eens fool-proof zijn voor de mensen die er mee gaan werken.
Excel2007 Engels
Ik heb het volgende.
Een lange lijst van nummers die allemaal 5-cijferig dienen te worden.
Via =IF(LEN(A1)=1;"0000"&A1 etc. is het niet moeilijk om te kortere nummers langer te maken.
Nu heeft iemand ook heel handig een aantal 6-cijferige referentienummers aan de data toegevoegd. Die beginnen allemaal met 900xxx. Dus bijv 900111. Dit moet worden 90111.
Ik dacht zelf iets in de trend van CONCATENATE en iets met LEFT(A1;1) en RIGHT(A1,4). Maar volgens mij kan ik formules niet concatenaten, het lukt mij iig niet.... Iemand een idee?
Ik heb het volgende.
Een lange lijst van nummers die allemaal 5-cijferig dienen te worden.
Via =IF(LEN(A1)=1;"0000"&A1 etc. is het niet moeilijk om te kortere nummers langer te maken.
Nu heeft iemand ook heel handig een aantal 6-cijferige referentienummers aan de data toegevoegd. Die beginnen allemaal met 900xxx. Dus bijv 900111. Dit moet worden 90111.
Ik dacht zelf iets in de trend van CONCATENATE en iets met LEFT(A1;1) en RIGHT(A1,4). Maar volgens mij kan ik formules niet concatenaten, het lukt mij iig niet.... Iemand een idee?
CONCATENATE is niet echt nodg hier, een ampersand voldoet:
LEFT(A1;1)&RIGHT(A1;4)
Beetje vreemd trouwens dat je Engels & Nederlandse notatie door elkaar hebt, normaal is Engels met komma's.
LEFT(A1;1)&RIGHT(A1;4)
Beetje vreemd trouwens dat je Engels & Nederlandse notatie door elkaar hebt, normaal is Engels met komma's.
Schoot me nu pas te binnen dat ik inderdaad gewoon een & teken ertussen kan plakken 
Thanks!
En ja die Engelse vs. Nederlandse notatie heeft te maken dat ik Engelse versie draai, maar met de systemen die we hier gebruiken Nederlandse datum en currency values moet gebruiken. Schept nog weleens verwarring.....
Thanks!En ja die Engelse vs. Nederlandse notatie heeft te maken dat ik Engelse versie draai, maar met de systemen die we hier gebruiken Nederlandse datum en currency values moet gebruiken. Schept nog weleens verwarring.....
Nog een andere vraag dan maar:
Ik gebruik nu Access om een fixed width vast te stellen, fixed number of characters is misschien een betere omschrijving.
Ik moet namelijk alles kunnen exporteren naar een .txt file die een leverancier kan uitlezen.
Bijvoorbeeld als in column B iemand Pietersen van z'n achternaam heet, en de volgende heet N'Gulu Faseko Faso, dan is het namelijk de bedoeling dat column C met voornaam voor alle rijen op exact dezelfde positie begint.
Is zoiets makkelijk te regelen in Excel, dat zou me namelijk een copy paste stap naar Access schelen! Iets via Custom settings van het cell-format? Thanks.
[ Bericht 4% gewijzigd door Stpan op 09-12-2009 11:04:44 ]
Ik gebruik nu Access om een fixed width vast te stellen, fixed number of characters is misschien een betere omschrijving.
Ik moet namelijk alles kunnen exporteren naar een .txt file die een leverancier kan uitlezen.
Bijvoorbeeld als in column B iemand Pietersen van z'n achternaam heet, en de volgende heet N'Gulu Faseko Faso, dan is het namelijk de bedoeling dat column C met voornaam voor alle rijen op exact dezelfde positie begint.
Is zoiets makkelijk te regelen in Excel, dat zou me namelijk een copy paste stap naar Access schelen! Iets via Custom settings van het cell-format? Thanks.
[ Bericht 4% gewijzigd door Stpan op 09-12-2009 11:04:44 ]
Wil je testen hoe lang iets is of moet er dan nog iets mee gebeuren?
Wat zou de output zijn als Pietersen in B1 staan en in B2 staat N'Gulu Faseko Faso ?
Wat zou de output zijn als Pietersen in B1 staan en in B2 staat N'Gulu Faseko Faso ?
De output zou moeten zijn dat:
Pietersen (+ 71 spaties)
N'Gula Bluka (+ bijv. 68 spaties)
Als ik dan exporteer naar txt dan zullen C1 en C2 en alle andere in kolom C op positie 81 beginnen.
Pietersen (+ 71 spaties)
N'Gula Bluka (+ bijv. 68 spaties)
Als ik dan exporteer naar txt dan zullen C1 en C2 en alle andere in kolom C op positie 81 beginnen.
Ah dus aanvullen tot 80 karakters.
Ik heb het zo gedaan, met een eigen functie:
Ga naar Visual Basic editor (Alt-F11), en voeg een Module toe (rechtermuisknop op je bestandsnaam, Insert -> Module).
Voeg daar deze code toe:
Nu kan je dmv VASTELENGTE(string) iets aanvullen tot 80 karakters (spaties aan het einde).
A1 = Pietersen
A2 = VASTELENGTE(A1)
A3 = LEN(A2)
A3 geeft dan waarde 80.
Ik heb het zo gedaan, met een eigen functie:
Ga naar Visual Basic editor (Alt-F11), en voeg een Module toe (rechtermuisknop op je bestandsnaam, Insert -> Module).
Voeg daar deze code toe:
| 1 2 3 4 5 6 7 8 | Dim b As String * 80 b = a VasteLengte = b End Function |
Nu kan je dmv VASTELENGTE(string) iets aanvullen tot 80 karakters (spaties aan het einde).
A1 = Pietersen
A2 = VASTELENGTE(A1)
A3 = LEN(A2)
A3 geeft dan waarde 80.
Onderstaande macro kopieert de regels die voldoen aan je zoekcriterium naar een nieuwe sheetquote:Op woensdag 9 december 2009 09:00 schreef Harmvt het volgende:
Ok, vergeet even die 6 bestanden. Het eerste dat ik wil bewerkstelligen is om de gegevens uit dat bestand dat ik in bovenstaande posts heb geupload te verzamelen in 1 verzamelsheet. Dat met die 6 bestanden lijkt er erg op, maar is de volgende stap.
Bovengenoemd bestand krijg ik wekelijks toegestuurd en ik wil gewoon dat alle gegevens toegevoegd worden aan 1 verzamelsheet, zodat ik er vervolgens grafieken etc op los kan laten om trends te ontdekken.
Handmatig kopiëren en plakken zou het meest voor de hand liggend zijn, maar ik wil dit trucje dus voor nog meer doeleinden gaan gebruiken. Zoals dat met die 6 bestanden. Dit alles moet ook nog eens fool-proof zijn voor de mensen die er mee gaan werken.
| 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 | ' ' FokTest Macro ' Dim datum, zoekdatum, bereik As String Dim startpunt, eindpunt As Integer datum = InputBox("Geef datum in te voeren bestand:(ddmmjj)") 'plaats hier je bestand open code zoekdatum = Left(datum, 2) & "/" & Mid(datum, 3, 2) & "/20" & Right(datum, 2) 'zoekdatum is datum waarop in excelsheet gezocht moet worden zoekdatum = DateValue(zoekdatum) 'datevalue converteert deze tekst naar een "echte datum" 'open bestand om in te zoeken Windows("WORegelInternWeek_091207(1).xls").Activate Range("A1").Select Do While ActiveCell.Value <> zoekdatum ActiveCell.Offset(1, 0).Select Loop 'nu is eerste cel met zoekdatum gevonden startpunt = ActiveCell.Row Do Until ActiveCell.Value <> zoekdatum ActiveCell.Offset(1, 0).Select Loop 'nu is laatste cel (eentje verder) met zoekdatum gevonden eindpunt = ActiveCell.Row - 1 Rows(startpunt & ":" & eindpunt).Select Selection.Copy Windows("Book2").Activate 'verzamelsheet openen Range("A10000").Select Selection.End(xlUp).Select ActiveCell.Offset(1, 0).Select 'eerste lege regel zoeken vanaf onderen ActiveSheet.Paste End Sub |
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 heb een cel met een formule waar een waarde uit komt.( ) Als de waarde onder de 200 komt moet hij rood worden en erboven groen.
Hoe doe ik dit?
) Als de waarde onder de 200 komt moet hij rood worden en erboven groen.Hoe doe ik dit?
érg!quote:Op woensdag 9 december 2009 21:52 schreef Mendeljev het volgende:
Waarom zie ik dit topic nu pas? Hoe geniaal is deze reeks?
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]
Voorwaardelijke opmaak. Te vinden in het lint in Excel 2007quote:Op woensdag 9 december 2009 21:32 schreef Cracka-ass het volgende:
Ik heb een cel met een formule waar een waarde uit komt.(
Hoe doe ik dit?
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]
Dit is de Fokking meest geniale reeks ever. Hij is zo fokking geniaal dat deze fokking geniale reeks opgenomen is in het guinessbook of records als meest fokking geniale reeks ever.quote:Op woensdag 9 december 2009 21:52 schreef Mendeljev het volgende:
Waarom zie ik dit topic nu pas? Hoe geniaal is deze reeks?
Verder heerst deze reeks zodanig omdat er alleen echte bazen in rondwaren.
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
Thanks, ik ga ernaar kijken. Ik denk dat een tussenstap via Access toch gebruiksvriendelijker is.quote:Op woensdag 9 december 2009 13:57 schreef DaFan het volgende:
Ah dus aanvullen tot 80 karakters.
Ik heb het zo gedaan, met een eigen functie:
Ga naar Visual Basic editor (Alt-F11), en voeg een Module toe (rechtermuisknop op je bestandsnaam, Insert -> Module).
Voeg daar deze code toe:
[ code verwijderd ]
Nu kan je dmv VASTELENGTE(string) iets aanvullen tot 80 karakters (spaties aan het einde).
A1 = Pietersen
A2 = VASTELENGTE(A1)
A3 = LEN(A2)
A3 geeft dan waarde 80.
Excel 2003 NL. Ik wil graag in een grafiek met een trendlijn die 2 periodes vooruit loopt, de labels op de X-as toevoegen voor deze extra periodes.
Voorbeeld:
Hier zou ik dus in de grafiek onder de X-as ook Apr en Mei willen hebben.
Al geprobeerd:
- apr en mei in cellen E1 en F1 ingetikt en grafiekgebied uitgebreid -> foutmelding
- de cellen daaronder met nullen gevuld en grafiekgebied uitgebreid -> trendlijn klopt niet meer
Ik kom er niet uit, maar zou denken dat het wel zou moeten kunnen... Iemand een idee? Alvast dank!
Voorbeeld:
Hier zou ik dus in de grafiek onder de X-as ook Apr en Mei willen hebben.
Al geprobeerd:
- apr en mei in cellen E1 en F1 ingetikt en grafiekgebied uitgebreid -> foutmelding
- de cellen daaronder met nullen gevuld en grafiekgebied uitgebreid -> trendlijn klopt niet meer
Ik kom er niet uit, maar zou denken dat het wel zou moeten kunnen... Iemand een idee? Alvast dank!
In office 2007 werkt dat wel gewoon door in E1 en F1 apr en may te zetten en de cellen eronder leeg. In 2003 geen idee.
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
En nulwaarden negeren aanvinken?quote:
Excel 2003 NL. Ik wil graag in een grafiek met een trendlijn die 2 periodes vooruit loopt, de labels op de X-as toevoegen voor deze extra periodes.
Voorbeeld:
[ afbeelding ]
Hier zou ik dus in de grafiek onder de X-as ook Apr en Mei willen hebben.
Al geprobeerd:
- apr en mei in cellen E1 en F1 ingetikt en grafiekgebied uitgebreid -> foutmelding
- de cellen daaronder met nullen gevuld en grafiekgebied uitgebreid -> trendlijn klopt niet meer
Ik kom er niet uit, maar zou denken dat het wel zou moeten kunnen... Iemand een idee? Alvast dank!
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]
Hm ja ik merk nu dat als ik van tevoren al apr en mei erbij zet, en dan pas de grafiek genereer (en daarna de trendlijn), dat het wel goed gaat, ook in 2003. Alleen achteraf aanpassen lijkt dus niet te lukken.quote:Op donderdag 10 december 2009 11:49 schreef Deetch het volgende:
In office 2007 werkt dat wel gewoon door in E1 en F1 apr en may te zetten en de cellen eronder leeg. In 2003 geen idee.
Probleem opgelost dus, dank!
wtfquote:Op donderdag 10 december 2009 10:30 schreef Deetch het volgende:
[..]
Dit is de Fokking meest geniale reeks ever. Hij is zo fokking geniaal dat deze fokking geniale reeks opgenomen is in het guinessbook of records als meest fokking geniale reeks ever.
Verder heerst deze reeks zodanig omdat er alleen echte bazen in rondwaren.
Denk je dat =VASTELENGTE() niet te snappen is?quote:Op donderdag 10 december 2009 11:04 schreef Stpan het volgende:
[..]
Thanks, ik ga ernaar kijken. Ik denk dat een tussenstap via Access toch gebruiksvriendelijker is.
Excel 2007, Vista.
Ik heb een tab met enkele gegevens. Deze gegevens moet ik in een ander tabblad hebben. Nu staat in tab 1 een datum, welke in een zin in tab 2 wil kopieeren.
De zin is (bv): Werknemer treedt in dienst van werkgever met ingang van [DATUM UIT TAB 1). De werkzaamheden bestaan uit blablabla.
Iemand een idee?
Ik heb een tab met enkele gegevens. Deze gegevens moet ik in een ander tabblad hebben. Nu staat in tab 1 een datum, welke in een zin in tab 2 wil kopieeren.
De zin is (bv): Werknemer treedt in dienst van werkgever met ingang van [DATUM UIT TAB 1). De werkzaamheden bestaan uit blablabla.
Iemand een idee?
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
"Werknemer treedt in dienst van werkgever met ingang van " & Blad1!A1 & "De werkzaamheden bestaan uit blablabla.
Als ik hem letterlijk c/p doet hij het niet.quote:Op donderdag 10 december 2009 13:58 schreef DaFan het volgende:
"Werknemer treedt in dienst van werkgever met ingang van " & Blad1!A1 & "De werkzaamheden bestaan uit blablabla.
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
moet nog een = voor en de datum moet idd op blad1, cel 1 staan en ook nog een " aan het eind
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
Of ik moet blad1 vervangen door de echte naam en cel neem ik aanquote:Op donderdag 10 december 2009 14:42 schreef Deetch het volgende:
moet nog een = voor en de datum moet idd op blad1, cel 1 staan en ook nog een " aan het eind
En wara moet de =? Aan begin van de regel, of voor "?
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
Sorry de datum moet ook nog naar een tekststring vertaald worden.
Sheet1!A1 is de celverwijzing, als je datum ergens anders staat dan alszodanig aanpassen
Indien je NL versie van office gebruikt:
TEXT=TEKST en misschien dat je het format "dd/mm/yyyy" nog naar wens moet aanpassen.
| 1 |
Sheet1!A1 is de celverwijzing, als je datum ergens anders staat dan alszodanig aanpassen
Indien je NL versie van office gebruikt:
TEXT=TEKST en misschien dat je het format "dd/mm/yyyy" nog naar wens moet aanpassen.
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
Alvast bedankt voor de moeite! Ik ga het aankomende maandag proberen!quote:Op woensdag 9 december 2009 18:19 schreef Deetch het volgende:
Onderstaande macro kopieert de regels die voldoen aan je zoekcriterium naar een nieuwe sheet
[ code verwijderd ]
-edit- te laat
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
Die yyyy hangt zelfs gewoon af van de taal die bij je windows is ingesteld. we werken hier allemaal met een engelse excel, maar doordat windows soms franstalig en soms nederlandstalig staat ingesteld, werkt die code niet steeds. Erg vervelend.quote:Op donderdag 10 december 2009 14:53 schreef Deetch het volgende:
Sorry de datum moet ook nog naar een tekststring vertaald worden.
[ code verwijderd ]
Sheet1!A1 is de celverwijzing, als je datum ergens anders staat dan alszodanig aanpassen
Indien je NL versie van office gebruikt:
TEXT=TEKST en misschien dat je het format "dd/mm/yyyy" nog naar wens moet aanpassen.
