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.
Dit zou toch moeten werken?quote:Op dinsdag 8 oktober 2024 15:02 schreef Symphonic het volgende:
Ik heb al diverse werkdocumenten met verticaal zoeken omgebouwd naar nieuwe situaties, en die heb ik ook altijd zonder problemen werkend gekregen, maar op een of andere manier lukt het me niet om de functie vanaf scratch op te bouwen.
De situatie is eigenlijk redelijk simpel: in tabel 1 staan klasnamen en daar moet de domein naam worden bij gezocht in de tabel Domein.
Is er iemand die me hiermee kan helpen? Mijn dank is groot.
[ afbeelding ]
=VERT.ZOEKEN(A2;Domein!$A$2:$B$3;2;ONWAAR)
Aldus.
Dankjewel. Ik ga het donderdag meteen uitproberen.quote:Op dinsdag 8 oktober 2024 15:52 schreef Z het volgende:
[..]
Dit zou toch moeten werken?
=VERT.ZOEKEN(A2;Domein!$A$2:$B$3;2;ONWAAR)
Ik denk nu te snappen waarom eerdere pogingen niet werkten.
Juin uit Eigen Tuin!
Is X.zoeken niet te gebruiken?quote:
Ik heb al diverse werkdocumenten met verticaal zoeken omgebouwd naar nieuwe situaties, en die heb ik ook altijd zonder problemen werkend gekregen, maar op een of andere manier lukt het me niet om de functie vanaf scratch op te bouwen.
De situatie is eigenlijk redelijk simpel: in tabel 1 staan klasnamen en daar moet de domein naam worden bij gezocht in de tabel Domein.
Is er iemand die me hiermee kan helpen? Mijn dank is groot.
[ afbeelding ]
Ik ben de kleur MAGENTA
Je bent openminded, tenzij iets niet in je straatje past. Je houdt van discussiėren, maar hebt natuurlijk altijd gelijk. Als echte dierenliefhebber voer je graag kleine eendjes aan grote honden.
Je bent openminded, tenzij iets niet in je straatje past. Je houdt van discussiėren, maar hebt natuurlijk altijd gelijk. Als echte dierenliefhebber voer je graag kleine eendjes aan grote honden.
ja, sowieso heb ik 3 variabelen.quote:
[..]
Heb je de kolomverwijzingen aangepast naar jouw situatie?
Het is de bedoeling dan in mijn grafiek 1 (staaf)diagram staat per klant met daarin de verdeling binnen tijd en over tijd. Dus als klant A 6 projecten heeft wil ik 1 staaf hebben met daarin 2 vlakken. in de grafiek dan alle klanten naast elkaar
Dank Z ik heb het werkend.quote:
Verticaal zoeken werkt hier perfect Ik zie nu ook wat ik voorheen verkeerd deed. De formules die ik in een ander document verbouwde waren ent iets anders opgebouwd.
Ik ga me wel verdiepen in X zoeken, daar zie ik ook nog wel een toepassing voor in het betreffende document.
Juin uit Eigen Tuin!
Ik zoek een stukje VBA code om na het uitvoeren van een Macro terug te keren in het tabblad van waaruit ik de macro heb opgestart.
Situatie:
Excel 2016
Excel document met 8 tabbladen (laten we ze 1-2-3-4-5-6-7-8 noemen). Ik wil een macro opstarten vanuit willekeurig welk tabblad die iets doet in tabblad 2. Dat lukt met Sheets("2").Select
Maar na het uitvoeren van de taak wil ik graag dat het scherm teruggaat naar het tabblad van waaruit ik de macro opgestart heb. Kan dat (en zo ja: hoe)?
Situatie:
Excel 2016
Excel document met 8 tabbladen (laten we ze 1-2-3-4-5-6-7-8 noemen). Ik wil een macro opstarten vanuit willekeurig welk tabblad die iets doet in tabblad 2. Dat lukt met Sheets("2").Select
Maar na het uitvoeren van de taak wil ik graag dat het scherm teruggaat naar het tabblad van waaruit ik de macro opgestart heb. Kan dat (en zo ja: hoe)?
I removed all the bad food from my house.
It was delicious.
It was delicious.
Die moest ik opzoeken. Nee, gebruik ik niet. Taak van de Macro is niet groot, het is vooral gemakszucht en het ontwijken van kringverwijzingen.quote:
Gebruik je Application.ScreenUpdating in je macro?
I removed all the bad food from my house.
It was delicious.
It was delicious.
Deze zet je voor je code:quote:
Ik zoek een stukje VBA code om na het uitvoeren van een Macro terug te keren in het tabblad van waaruit ik de macro heb opgestart.
Situatie:
Excel 2016
Excel document met 8 tabbladen (laten we ze 1-2-3-4-5-6-7-8 noemen). Ik wil een macro opstarten vanuit willekeurig welk tabblad die iets doet in tabblad 2. Dat lukt met Sheets("2").Select
Maar na het uitvoeren van de taak wil ik graag dat het scherm teruggaat naar het tabblad van waaruit ik de macro opgestart heb. Kan dat (en zo ja: hoe)?
| 1 | ws = ActiveSheet.Name |
en deze na je code:
| 1 | Worksheets(ws).Activate |
Dim bestand,startsheet as Stringquote:
Ik zoek een stukje VBA code om na het uitvoeren van een Macro terug te keren in het tabblad van waaruit ik de macro heb opgestart.
Situatie:
Excel 2016
Excel document met 8 tabbladen (laten we ze 1-2-3-4-5-6-7-8 noemen). Ik wil een macro opstarten vanuit willekeurig welk tabblad die iets doet in tabblad 2. Dat lukt met Sheets("2").Select
Maar na het uitvoeren van de taak wil ik graag dat het scherm teruggaat naar het tabblad van waaruit ik de macro opgestart heb. Kan dat (en zo ja: hoe)?
bestand = ActiveWorkbook.Name
startsheet = ActiveSheet.name
<al je selecties en bewerkingen die je wilt>
Windows(bestand).Activate
Sheets(startsheet).Activate
[ Bericht 0% gewijzigd door snabbi op 10-11-2024 22:08:10 ]
Thanks, ik ga ze vanavond uitproberen.
Die van Rectum lijkt de makkelijkste.
Die van Rectum lijkt de makkelijkste.
I removed all the bad food from my house.
It was delicious.
It was delicious.
Ik heb die van Rectum gebruikt en dat doet wat ik wil.quote:
[..]
Dim bestand,startsheet as String
bestand = ActiveWorkbook.Name
startsheet = ActiveSheet.name
<al je selecties en bewerkingen die je wilt>
Windows(bestand).Activate
Sheets(startsheet).Activate
Wat doet jouw code anders, welk nut heeft het om die te gebruiken boven de andere?
I removed all the bad food from my house.
It was delicious.
It was delicious.
Het stukje van Rectum over Worksheets(ws).Activate is hetzelfde als de mijne met Sheets(startsheet).Activate en richt zich volledig op het tabblad.quote:
[..]
Ik heb die van Rectum gebruikt en dat doet wat ik wil.
Wat doet jouw code anders, welk nut heeft het om die te gebruiken boven de andere?
De toevoeging die ik gedaan heb met Windows(bestand).Activate is als je door meerdere excelbestanden heen gaat bladeren en je dus weer terug moet naar het excelbestand waar je mee begonnen bent.
Oh dat kan inderdaad heel handig zijn.quote:
[..]
Het stukje van Rectum over Worksheets(ws).Activate is hetzelfde als de mijne met Sheets(startsheet).Activate en richt zich volledig op het tabblad.
De toevoeging die ik gedaan heb met Windows(bestand).Activate is als je door meerdere excelbestanden heen gaat bladeren en je dus weer terug moet naar het excelbestand waar je mee begonnen bent.
Dank voor de uitleg.
Deze toch ook maar toegevoegd. Voor snelheid (in mijn situatie) niet echt nuttig, maar wel lekker om het verspringende beeld kwijt te zijn.quote:
Gebruik je Application.ScreenUpdating in je macro?
[ Bericht 13% gewijzigd door Sometimes op 11-11-2024 21:22:19 ]
I removed all the bad food from my house.
It was delicious.
It was delicious.
Avond, als ik cellen via celstijlen van een kleurtje voorzie, zeg groen en rood. Hoe maak ik daar eenvoudig een cirkeldiagram van, die laat zien welk percentage groen en rood is? Alvast bedankt!
Gewoon een cirkeldiagram invoegen en de categorieėn van dezelfde kleurtjes voorzien. Automatisch gaat dat sowieso niet, volgens mij.quote:
Avond, als ik cellen via celstijlen van een kleurtje voorzie, zeg groen en rood. Hoe maak ik daar eenvoudig een cirkeldiagram van, die laat zien welk percentage groen en rood is? Alvast bedankt!
Resistance is futile.
CoPilot heeft een online versie die dit dit in minder dan 20 seconden voor je schrijft.quote:
Ik zoek een stukje VBA code om na het uitvoeren van een Macro terug te keren in het tabblad van waaruit ik de macro heb opgestart.
Situatie:
Excel 2016
Excel document met 8 tabbladen (laten we ze 1-2-3-4-5-6-7-8 noemen). Ik wil een macro opstarten vanuit willekeurig welk tabblad die iets doet in tabblad 2. Dat lukt met Sheets("2").Select
Maar na het uitvoeren van de taak wil ik graag dat het scherm teruggaat naar het tabblad van waaruit ik de macro opgestart heb. Kan dat (en zo ja: hoe)?
Resistance is futile.
mijn kolommen stoppen bij kolom IV
Wat te weinig is omdat ik dan niet alle dagen op het rekenblad krijg
Nu las ik dat dit te maken kan hebben met de voorwaardelijke opmaak maar ik kom er niet uit;
iemand een idee?
Wat te weinig is omdat ik dan niet alle dagen op het rekenblad krijg
Nu las ik dat dit te maken kan hebben met de voorwaardelijke opmaak maar ik kom er niet uit;
iemand een idee?
Je voorwaardelijke opmaak is op dat screenshot ruim zat, dus dat zou het probleem niet moeten zijn. Kan je niet gewoon kolommen verder door kopiėren?quote:
mijn kolommen stoppen bij kolom IV
Wat te weinig is omdat ik dan niet alle dagen op het rekenblad krijg
Nu las ik dat dit te maken kan hebben met de voorwaardelijke opmaak maar ik kom er niet uit;
iemand een idee?
[ afbeelding ]
Ik ben de kleur MAGENTA
Je bent openminded, tenzij iets niet in je straatje past. Je houdt van discussiėren, maar hebt natuurlijk altijd gelijk. Als echte dierenliefhebber voer je graag kleine eendjes aan grote honden.
Je bent openminded, tenzij iets niet in je straatje past. Je houdt van discussiėren, maar hebt natuurlijk altijd gelijk. Als echte dierenliefhebber voer je graag kleine eendjes aan grote honden.
Dat zijn er 256. Hele oude versie van Excel toevallig?quote:
mijn kolommen stoppen bij kolom IV
Wat te weinig is omdat ik dan niet alle dagen op het rekenblad krijg
Nu las ik dat dit te maken kan hebben met de voorwaardelijke opmaak maar ik kom er niet uit;
iemand een idee?
[ afbeelding ]
Opinion is the medium between knowledge and ignorance (Plato)
16384, oftewel 2^14. Net een tikkeltje meer dan die 2^8 uit vroeger tijden.quote:
Ik was benieuwd naar het aantal kolommen, bij mij is de laatste kolom xfd.
Opinion is the medium between knowledge and ignorance (Plato)
Maar heb je op een normaal, leeg werkblad dan wel meer dan die 256 kolommen?quote:
ik werk gewoon in de laatste Excel versie via Microsoft 365 van het bedrijf
Opinion is the medium between knowledge and ignorance (Plato)
ja normaal heb ik gewoon oneindig kolommen, dit is gekomen na voorwaardelijke opmaakquote:
[..]
Maar heb je op een normaal, leeg werkblad dan wel meer dan die 256 kolommen?
Dat is echt heel raar. Dat lijkt me onderhand een bug-achtige toestand... Je had de data van 13/09 tot 31/21 dus oorspronkelijk wel gewoon op je blad staan?quote:
[..]
ja normaal heb ik gewoon oneindig kolommen, dit is gekomen na voorwaardelijke opmaak
[ afbeelding ]
Als je de regels voor voorwaardelijke opmaak verwijdert, krijg je je missende kolommen dan weer terug?
Als je het hele werkblad kopieert naar een nieuw werkblad (eventueel met Waarden plakken), zie je ze dan wel weer?
Opinion is the medium between knowledge and ignorance (Plato)
Misschien per ongeluk de kolombreedte van de niet zichtbare kolommen op 0 gezet, dan zie ik ze ook niet meer.
Doe even CTRL A om alles te selecteren - klik met je rechtermuistoets in 1 van de kolom-letter en kies om de verborgen kolommen weer te geven (unhide/zichtbaar maken).
Nee, ik had dit werkblad vorig jaar midden in het jaar gemaakt, begin dit jaar gekopierd en de data aangepast, toen merkte ik dat ik kolommen mistequote:Op maandag 3 februari 2025 16:23 schreef Janneke141 het volgende:
[..]
Dat is echt heel raar. Dat lijkt me onderhand een bug-achtige toestand... Je had de data van 13/09 tot 31/21 dus oorspronkelijk wel gewoon op je blad staan?
Als je de regels voor voorwaardelijke opmaak verwijdert, krijg je je missende kolommen dan weer terug?
Als je het hele werkblad kopieert naar een nieuw werkblad (eventueel met Waarden plakken), zie je ze dan wel weer?
Deze werkmap heeft nog andere tabbladen, daar vond ik inderdaad een verborgen gedeelte wat blijkbaar ook weer invloed had op dit tabblad.quote:
verborgen kolommen weer te geven (unhide/zichtbaar maken).
Opgelost, bedankt voor het meedenken
Is er een manier om een bepaalde tabel te vinden in een excel sheet? Ik kreeg bij het openen van een bestand met veel tabellen een foutmelding, in 2 tabellen is iets gerepareerd. Maar dit bestand heeft weet ik veel hoeveel tabellen, uiteraard bij lange na niet allemaal netjes met naam en nu weet ik niet welke tabellen zijn gerepareerd 
Oh ja, ik gebruik de Spaanse versiequote:<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<recoveryLog xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main"><logFileName>error146520_01.xml</logFileName><summary>Se han detectado errores en el archivo "(bestandsnaam weggehaald ivm privacy).xlsx"</summary><additionalInfo><info>Excel ha completado la validación y reparación en nivel de archivo. Puede que se hayan reparado o descartado algunas partes de este libro.</info></additionalInfo><repairedRecords><repairedRecord>Registros reparados: Tabla de /xl/tables/table7.xml parte (Tabla)</repairedRecord><repairedRecord>Registros reparados: Tabla de /xl/tables/table11.xml parte (Tabla)</repairedRecord></repairedRecords></recoveryLog>
Ik hou me bezig met het organiseren van reizen naar Argentinie, Chili en Peru voor Tipica Reizen.
Enkele jaren geleden had ik een excelbestand die hele voetbalcompetities maakte
Je moest het aantal teams, hoeveel keer ze tegen elkaar moesten, invullen en de namen. Excel berekende de wedstrijden en je kon ook de wedstrijden invullen
Weet iemand waar je zo'n bestand kan downloaden?
ik heb deze tutorial op Youtube gevonden. Maar het is in het Engels terwijl mijn excel in het Nederlands is
Bekijk deze YouTube-video
En ben gewoon te dom om het zelf te bouwen.
Je kan het downloaden maar ze vragen eerst 21 euro per maand te betalen lol. Dat is wel extreem duur voor een bestandje
Je moest het aantal teams, hoeveel keer ze tegen elkaar moesten, invullen en de namen. Excel berekende de wedstrijden en je kon ook de wedstrijden invullen
Weet iemand waar je zo'n bestand kan downloaden?
ik heb deze tutorial op Youtube gevonden. Maar het is in het Engels terwijl mijn excel in het Nederlands is
Bekijk deze YouTube-video
En ben gewoon te dom om het zelf te bouwen.
Je kan het downloaden maar ze vragen eerst 21 euro per maand te betalen lol. Dat is wel extreem duur voor een bestandje
Ik ben een man met een onverklaarbare fascinatie voor capuchons. Ze zijn mijn tweede huid—altijd om me heen, altijd vertrouwd. Ik draag ze niet alleen, ik lééf erin. Het voelt magisch als iemand er zachtjes aan trekt, een speels moment vol onverwachte connectie. En als mijn capuchon ergens blijft haken? Pure vreugde! Een klein avontuur in het alledaagse, alsof de wereld me even vasthoudt. Capuchons en ik? Een onafscheidelijk duo
Met een simpel zoeken in je gewenste zoekmachine vind je zo een lijst van Excel-functies en de vertalingen.
Ik ben toch van start gegaan. Was al een tijdje van plan om Microsoft 365 aan te schaffen en ben nu bezig in de laatste EXCEL. Ik ben halverwege deze tutorial en het gaat best "goed" Soms vergeet ik een ")" of een ";" maar het gaat best goed.quote:Op woensdag 26 februari 2025 18:11 schreef Tegan het volgende:
Met een simpel zoeken in je gewenste zoekmachine vind je zo een lijst van Excel-functies en de vertalingen.
Gisteren 3 uur bezig geweest voor een stukje van 24 minuten. Dat is misschien best traag. Maar goed.
Ik ben een man met een onverklaarbare fascinatie voor capuchons. Ze zijn mijn tweede huid—altijd om me heen, altijd vertrouwd. Ik draag ze niet alleen, ik lééf erin. Het voelt magisch als iemand er zachtjes aan trekt, een speels moment vol onverwachte connectie. En als mijn capuchon ergens blijft haken? Pure vreugde! Een klein avontuur in het alledaagse, alsof de wereld me even vasthoudt. Capuchons en ik? Een onafscheidelijk duo
Voor je het weet kun je anderen gewoon 21 euro vragen voor jouw werkquote:
[..]
Ik ben toch van start gegaan. Was al een tijdje van plan om Microsoft 365 aan te schaffen en ben nu bezig in de laatste EXCEL. Ik ben halverwege deze tutorial en het gaat best "goed" Soms vergeet ik een ")" of een ";" maar het gaat best goed.
Gisteren 3 uur bezig geweest voor een stukje van 24 minuten. Dat is misschien best traag. Maar goed.
.
Had je dit niet gewoon aan Copilot kunnen vragen?quote:
[..]
Ik ben toch van start gegaan. Was al een tijdje van plan om Microsoft 365 aan te schaffen en ben nu bezig in de laatste EXCEL. Ik ben halverwege deze tutorial en het gaat best "goed" Soms vergeet ik een ")" of een ";" maar het gaat best goed.
Gisteren 3 uur bezig geweest voor een stukje van 24 minuten. Dat is misschien best traag. Maar goed.
Resistance is futile.
Ik heb ontdekt dat Copilot ook alle code kan schrijven. Binnenkort cursus AI en dan gaan mijn Excel skills hopelijk ook naar het volgende niveau.
Resistance is futile.
Copilot zegt dit op mijn vraag 'Kan je in een bestand met honderden tabellen de gerepareerde tabellen in een apart tabblad zetten?'quote:
Is er een manier om een bepaalde tabel te vinden in een excel sheet? Ik kreeg bij het openen van een bestand met veel tabellen een foutmelding, in 2 tabellen is iets gerepareerd. Maar dit bestand heeft weet ik veel hoeveel tabellen, uiteraard bij lange na niet allemaal netjes met naam en nu weet ik niet welke tabellen zijn gerepareerd
[..]
Oh ja, ik gebruik de Spaanse versie
Sub KopieerGerepareerdeTabellen()
Dim ws As Worksheet
Dim nieuwTabblad As Worksheet
Dim rng As Range
Dim doelRij As Long
' Maak een nieuw werkblad aan voor de gerepareerde tabellen
Set nieuwTabblad = ThisWorkbook.Worksheets.Add
nieuwTabblad.Name = "GerepareerdeTabellen"
doelRij = 1
' Loop door elk werkblad in de werkmap
For Each ws In ThisWorkbook.Worksheets
If ws.Name <> "GerepareerdeTabellen" Then
' Zoek de gerepareerde tabellen
' (hier wordt aangenomen dat ze een specifieke tekst bevatten, bv. "gerepareerd")
Set rng = ws.UsedRange.Find(What:="gerepareerd", LookIn:=xlValues, LookAt:=xlPart)
If Not rng Is Nothing Then
' Kopieer de gevonden tabel naar het nieuwe tabblad
ws.UsedRange.Copy Destination:=nieuwTabblad.Cells(doelRij, 1)
doelRij = doelRij + ws.UsedRange.Rows.Count + 1 ' Volgende vrije rij
End If
End If
Next ws
End Sub
Resistance is futile.
Ik sluit niet uit dat ik deze vraag al ooit eerder gesteld heb want het probleem komt me bekend voor, maar ik kan het zo niet terugvinden.
Op basis van een dataset uit een externe bron wordt een hele simpele draaitabel gemaakt. De header op de bovenste rij bestaat uit een stuk of 30 lettercombinaties van 2 letters, die in een draaitabel automatisch alfabetisch gesorteerd worden. Alleen... tussen die codes zitten ook VR en ZO, en die worden door Excel vooraan gezet omdat ze worden aangezien voor Vrijdag en Zondag. Hoe pas ik dat aan? (en dan zo dat het ook op de goede plek blijft staan, en niet bij elke Gegevens Vernieuwen weer terugspringt)?
Op basis van een dataset uit een externe bron wordt een hele simpele draaitabel gemaakt. De header op de bovenste rij bestaat uit een stuk of 30 lettercombinaties van 2 letters, die in een draaitabel automatisch alfabetisch gesorteerd worden. Alleen... tussen die codes zitten ook VR en ZO, en die worden door Excel vooraan gezet omdat ze worden aangezien voor Vrijdag en Zondag. Hoe pas ik dat aan? (en dan zo dat het ook op de goede plek blijft staan, en niet bij elke Gegevens Vernieuwen weer terugspringt)?
Opinion is the medium between knowledge and ignorance (Plato)
Heb je al geprobeerd om te formatteren naar tekst?quote:
Ik sluit niet uit dat ik deze vraag al ooit eerder gesteld heb want het probleem komt me bekend voor, maar ik kan het zo niet terugvinden.
Op basis van een dataset uit een externe bron wordt een hele simpele draaitabel gemaakt. De header op de bovenste rij bestaat uit een stuk of 30 lettercombinaties van 2 letters, die in een draaitabel automatisch alfabetisch gesorteerd worden. Alleen... tussen die codes zitten ook VR en ZO, en die worden door Excel vooraan gezet omdat ze worden aangezien voor Vrijdag en Zondag. Hoe pas ik dat aan? (en dan zo dat het ook op de goede plek blijft staan, en niet bij elke Gegevens Vernieuwen weer terugspringt)?
Resistance is futile.
Die opmaak die verandert na verversenquote:
Ik sluit niet uit dat ik deze vraag al ooit eerder gesteld heb want het probleem komt me bekend voor, maar ik kan het zo niet terugvinden.
Op basis van een dataset uit een externe bron wordt een hele simpele draaitabel gemaakt. De header op de bovenste rij bestaat uit een stuk of 30 lettercombinaties van 2 letters, die in een draaitabel automatisch alfabetisch gesorteerd worden. Alleen... tussen die codes zitten ook VR en ZO, en die worden door Excel vooraan gezet omdat ze worden aangezien voor Vrijdag en Zondag. Hoe pas ik dat aan? (en dan zo dat het ook op de goede plek blijft staan, en niet bij elke Gegevens Vernieuwen weer terugspringt)?
Klik met de rechtermuisknop ergens in de draaitabel, zodat een snelmenu verschijnt.
Klik (met linkermuisknop) op de keuze “Opties voor draaitabel…”;
het dialoogvenster voor het instellen van de opties wordt geactiveerd.
Selecteer in dit dialoogvenster het tabblad “Indeling en opmaak”.
Verwijder het vinkje bij “Kolombreedte automatisch aanpassen bij bijwerken”.
klik op OK.
Die ZO en VR kan je misschien oplossen door een aangepaste lijst (bestand opties geavanceerd en dan aangepaste lijst) te maken. Weet ik niet zeker
quote:Op zaterdag 29 maart 2025 10:08 schreef Seven. het volgende:
[..]
Heb je al geprobeerd om te formatteren naar tekst?
Ja, zo simpel kan het natuurlijk zijn. Dank u
En deze is ook sowieso handig. Thx!quote:
Die opmaak die verandert na verversen
Opinion is the medium between knowledge and ignorance (Plato)
Ik kreeg weer zo´n tabelfout vandaag bij het openen van een bestand. Maar eens voorgelegd aan ChatGPT en die had een veel handiger slimmigheidje / slimmer handigheidje!quote:
[..]
Copilot zegt dit op mijn vraag 'Kan je in een bestand met honderden tabellen de gerepareerde tabellen in een apart tabblad zetten?'
Sub KopieerGerepareerdeTabellen()
Dim ws As Worksheet
Dim nieuwTabblad As Worksheet
Dim rng As Range
Dim doelRij As Long
' Maak een nieuw werkblad aan voor de gerepareerde tabellen
Set nieuwTabblad = ThisWorkbook.Worksheets.Add
nieuwTabblad.Name = "GerepareerdeTabellen"
doelRij = 1
' Loop door elk werkblad in de werkmap
For Each ws In ThisWorkbook.Worksheets
If ws.Name <> "GerepareerdeTabellen" Then
' Zoek de gerepareerde tabellen
' (hier wordt aangenomen dat ze een specifieke tekst bevatten, bv. "gerepareerd")
Set rng = ws.UsedRange.Find(What:="gerepareerd", LookIn:=xlValues, LookAt:=xlPart)
If Not rng Is Nothing Then
' Kopieer de gevonden tabel naar het nieuwe tabblad
ws.UsedRange.Copy Destination:=nieuwTabblad.Cells(doelRij, 1)
doelRij = doelRij + ws.UsedRange.Rows.Count + 1 ' Volgende vrije rij
End If
End If
Next ws
End Sub
Zo gepiept, tabel gevonden en eruit geflikkerd. Was niet nodig om hem opnieuw te maken gelukkig.quote:Hoe vind je table11.xml terug in je Excelbestand?
Optie 1: Excelbestand als zip openen
Maak een kopie van het Excelbestand.
Wijzig de extensie van .xlsx naar .zip.
Open dit zip-bestand.
Navigeer naar de map: xl/tables/
Zoek daar table11.xml – je kunt dit bestand openen met een teksteditor zoals Notepad++ of VS Code.
In dat XML-bestand staat een verwijzing naar:
de tabelnaam (als die is toegekend),
het werkblad waar de tabel op staat (sheetId of sheet name),
het celbereik (bijv. A1:G20).
Ik hou me bezig met het organiseren van reizen naar Argentinie, Chili en Peru voor Tipica Reizen.
Ik heb op mijn werk een excel gamaakt waarin 2 lijsten met data uit andere programma's samengevoegd worden tot 1 leesbaar geheel.
iedereen die dat wil doen gebruikt dat bestand zonder mijn verdere tussenkomst.
Als ze hun gegevens ingekopieerd hebben drukken ze als laatste op een knopje dat een macro start om een een nieuw werkblad te openen en daar alles in de juiste layout in te plakken.
Zo heeft iedere teamleider tijdens het dagelijks overleg met het managment alle data op de zelfde manier in beeld en kunnen ze uitleggen waarom hun team de doelstellingen weer niet gehaald heeft.
Ik krijg een ding niet voor elkaar. Die macro opent een nieuwe excel en plakt de data in "Sheet1".
Maar er zijn ook teamleiders (of hun vervangers) die de Nederlandse versie gebruiken en dan heet het "Blad1"
En dan doet de macro het niet...
Kan ik de code aanpassen zodat het met "Blad1" ook werkt?
iedereen die dat wil doen gebruikt dat bestand zonder mijn verdere tussenkomst.
Als ze hun gegevens ingekopieerd hebben drukken ze als laatste op een knopje dat een macro start om een een nieuw werkblad te openen en daar alles in de juiste layout in te plakken.
Zo heeft iedere teamleider tijdens het dagelijks overleg met het managment alle data op de zelfde manier in beeld en kunnen ze uitleggen waarom hun team de doelstellingen weer niet gehaald heeft.
Ik krijg een ding niet voor elkaar. Die macro opent een nieuwe excel en plakt de data in "Sheet1".
Maar er zijn ook teamleiders (of hun vervangers) die de Nederlandse versie gebruiken en dan heet het "Blad1"
En dan doet de macro het niet...
| 1 2 3 4 5 6 7 | ' ' Nwe_excel_openen_en_teksten_inkopieren ' Set newbook = Workbooks.Add Workbooks("AutoDTO.xlsm").Worksheets("Result").Range("A1:G100").Copy newbook.Worksheets("Sheet1").Range("A1").PasteSpecial (xlPasteColumnWidths) newbook.Worksheets("Sheet1").Range("A1").PasteSpecial (xlPasteValues) |
Kan ik de code aanpassen zodat het met "Blad1" ook werkt?
Wie dit leest is gek
Sheets(1) zou ook moeten werken. Deze pakt de meest linker sheet.quote:Op maandag 7 juli 2025 09:35 schreef Nieuwschierig het volgende:
Ik heb op mijn werk een excel gamaakt waarin 2 lijsten met data uit andere programma's samengevoegd worden tot 1 leesbaar geheel.
iedereen die dat wil doen gebruikt dat bestand zonder mijn verdere tussenkomst.
Als ze hun gegevens ingekopieerd hebben drukken ze als laatste op een knopje dat een macro start om een een nieuw werkblad te openen en daar alles in de juiste layout in te plakken.
Zo heeft iedere teamleider tijdens het dagelijks overleg met het managment alle data op de zelfde manier in beeld en kunnen ze uitleggen waarom hun team de doelstellingen weer niet gehaald heeft.
Ik krijg een ding niet voor elkaar. Die macro opent een nieuwe excel en plakt de data in "Sheet1".
Maar er zijn ook teamleiders (of hun vervangers) die de Nederlandse versie gebruiken en dan heet het "Blad1"
En dan doet de macro het niet...
[ code verwijderd ]
Kan ik de code aanpassen zodat het met "Blad1" ook werkt?
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]
Momenteel ben ik bezig met het jaarvoorspelling van het weer competitie.
Nu ben ik zover gekomen om naast al het overzicht van de scores, ook nog een overzicht wil maken van de plaatsnamen, hoeveel keer de warmste plek is geweest etc.
Nu gaat me dat wel goed af door =AANTAL.ALS('Gemeten gegevens'!C2:C366;A7) te doen, hiermee wordt bijvoorbeeld Hoek van Holland erbij gepakt, in dit geval 9x.
Nu is het zo dat er soms ook dagen zijn die dubbele plaatsnamen hebben, bijvoorbeeld: Hoek van Holland / Wijk aan zee, deze wordt echter niet meegenomen in de score, het blijft op 9 staan. In welke form ik ook probeer, met , . : ; " enz, het mag gewoon niet lukken.
Is er een mogelijkheid om ook de dubbele namen apart in mee te nemen? Of kan ik hier beter een aparte lijst ernaast aan toe voegen door de dubbele plaatsnamen.
Nu ben ik zover gekomen om naast al het overzicht van de scores, ook nog een overzicht wil maken van de plaatsnamen, hoeveel keer de warmste plek is geweest etc.
Nu gaat me dat wel goed af door =AANTAL.ALS('Gemeten gegevens'!C2:C366;A7) te doen, hiermee wordt bijvoorbeeld Hoek van Holland erbij gepakt, in dit geval 9x.
Nu is het zo dat er soms ook dagen zijn die dubbele plaatsnamen hebben, bijvoorbeeld: Hoek van Holland / Wijk aan zee, deze wordt echter niet meegenomen in de score, het blijft op 9 staan. In welke form ik ook probeer, met , . : ; " enz, het mag gewoon niet lukken.
Is er een mogelijkheid om ook de dubbele namen apart in mee te nemen? Of kan ik hier beter een aparte lijst ernaast aan toe voegen door de dubbele plaatsnamen.
Doe mee met het voorspellen van het weer!
Weekvoorspelling -- Week 1
Maandvoorspelling februari.
Jaarvoorspelling 2024 --- Jaarvoorspelling 2025!
Weekvoorspelling -- Week 1
Maandvoorspelling februari.
Jaarvoorspelling 2024 --- Jaarvoorspelling 2025!
Hier lopen ze gewoon mee in een korte test, het moet dus ook kunnen in 1 lijst. De datum zou niet uit mogen maken.
stupidity has become as common as common sense was before
Ik heb even een test gedaan, maar zoals je ziet wil het niet werken. Als ik Leeuwarden eruit haal en Dokkum laat staan dan wordt het wel opgeteld.quote:
Hier lopen ze gewoon mee in een korte test, het moet dus ook kunnen in 1 lijst. De datum zou niet uit mogen maken.
Doe mee met het voorspellen van het weer!
Weekvoorspelling -- Week 1
Maandvoorspelling februari.
Jaarvoorspelling 2024 --- Jaarvoorspelling 2025!
Weekvoorspelling -- Week 1
Maandvoorspelling februari.
Jaarvoorspelling 2024 --- Jaarvoorspelling 2025!
Alleen zie ik het nietquote:
[..]
Ik heb even een test gedaan, maar zoals je ziet wil het niet werken. Als ik Leeuwarden eruit haal en Dokkum laat staan dan wordt het wel opgeteld.
stupidity has become as common as common sense was before
|
|
