Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: Wegschrijven Data Macro  (gelezen 2479 keer)

0 leden en 1 gast bekijken dit topic.

Offline JessiePeters

  • Lid
  • *
  • Berichten: 19
  • Geslacht: Vrouw
  • Hey, ik ben nieuw hier !
Re: Wegschrijven Data Macro
« Reactie #15 Gepost op: 04 november 2022, 20:22:20 »
Hi Molly, ik ben erg benieuwd naar je oplossing. Je hoort nog van me.

Offline JessiePeters

  • Lid
  • *
  • Berichten: 19
  • Geslacht: Vrouw
  • Hey, ik ben nieuw hier !
Re: Wegschrijven Data Macro
« Reactie #16 Gepost op: 06 november 2022, 11:19:58 »
Hoi Molly,

Bedankt voor je antwoord. Is het toch mogelijk om mijn tabblad Dag Berekening wel te behouden?
Soms is het handig om toch even terug te kijken naar de details van 1 bepaalde dag.

Is het ook mogelijk om bijvoorbeeld 1 dag te selecteren en alleen deze specifieke dag weg te schrijven naar de juiste rij in samenvatting sheet? Dit heeft te maken dat er soms een afwijking is in de data, die ik dan handmatig kan aanpassen. Daarna zet ik de formules wel weer terug.

Zou je me alsnog kunnen helpen met het wegschrijven van de data waarin ik de sheet Dag  Berekening behoud en deze dan de dagen 1 voor 1 leest, en deze dan wegschrijft naar de Samenvatting?

Hiermee heb ik meerdere oplossingen en kan ik checken wat dan het fijnste werkt voor het vervolg van mijn opdracht.
 
Gr. Jessie



Offline MollyVH

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 847
Re: Wegschrijven Data Macro
« Reactie #17 Gepost op: 06 november 2022, 12:02:28 »
Hallo Jessie,

Citaat
Zou je me alsnog kunnen helpen met het wegschrijven van de data waarin ik de sheet Dag  Berekening behoud en deze dan de dagen 1 voor 1 leest, en deze dan wegschrijft naar de Samenvatting?
??? Die had ik je toch ook al bezorgd in reactie #12!

Voor je bijkomende vraag lijkt het me dan eenvoudigst om een knop op Dag Berekening te gebruiken met, nogmaals, een kort macrootje.
Het is dus versie 4 geworden  :)

Mvg,
Molly
Windows 11 Home NLD 64bit
11th Gen Intel(R) Core(TM) i7-11700 @ 2.50GHz 2496
Aspire TC-1660
Intel(R) UHD Graphics 750 1024MB
476 GB SSD KINGSTON OM8PCP3512F-AA
1863 GB HD Seagate ST2000DM008-2FR102
Office 2021 Professional Plus NLD 64bit

Offline JessiePeters

  • Lid
  • *
  • Berichten: 19
  • Geslacht: Vrouw
  • Hey, ik ben nieuw hier !
Re: Wegschrijven Data Macro
« Reactie #18 Gepost op: 07 november 2022, 07:58:06 »
Molly, zo bedankt! Dit is exact wat ik nog hebt.

Offline JessiePeters

  • Lid
  • *
  • Berichten: 19
  • Geslacht: Vrouw
  • Hey, ik ben nieuw hier !
Re: Wegschrijven Data Macro
« Reactie #19 Gepost op: 24 november 2022, 14:37:31 »
Hoi Molly en anderen,

Molly heeft een macro gemaakt waarin ik constant dezelfde rij (met verschillende inhoud) wegschreef. Zouden jullie naar mijn macro kunnen kijken en checken waarom deze niet werkt voor het kopieren naar kolommen?
Hierbij mijn voorbeeld. De resultaten van de eerste 2 kolommen heb ik handmatig erin geplakt.



Offline MollyVH

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 847
Re: Wegschrijven Data Macro
« Reactie #20 Gepost op: 25 november 2022, 10:04:09 »
Hallo Jessie,

Leuk om te merken dat je zelf al een lovenswaardige poging had gedaan!
Een paar foutjes zaten er nog in. Voor een beter inzicht heb ik ze in de code als commentaar laten staan en de juiste er onder gezet.
Ik neem aan dat ook dit deel gaat uitmaken van een veel uitgebreider document en extra bewerkingen(?), want anders zou het weer veel eenvoudiger zijn.

Mvg,
Molly
Windows 11 Home NLD 64bit
11th Gen Intel(R) Core(TM) i7-11700 @ 2.50GHz 2496
Aspire TC-1660
Intel(R) UHD Graphics 750 1024MB
476 GB SSD KINGSTON OM8PCP3512F-AA
1863 GB HD Seagate ST2000DM008-2FR102
Office 2021 Professional Plus NLD 64bit

Offline MollyVH

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 847
Re: Wegschrijven Data Macro
« Reactie #21 Gepost op: 26 november 2022, 11:14:09 »
Hallo Jessie,

Ik wil er graag even op wijzen dat het op dit forum de bedoeling is dat iedereen er iets mag van opsteken, juist omdat we hier als 'hobby' (lees: gratis) mensen helpen. Ik zal daarom met plezier je via PB ontvangen vraag ook beantwoorden, maar dus in dit draadje.
Uit dat PB:
Citaat
...er wordt gekopierd en daarna als waardes geplakt.
De code doet dit inderdaad, maar waarom lees ik het stukje "copy" en "paste als waardes" niet terug in de code?
En hoe lees ik het stukje transpose (transpose)

Voor wat jij in dit document wil zou dat inderdaad ook met copy/paste kunnen. Maar in heel veel gevallen worden met vba waarden opgehaald uit een werkblad, ondergaan daar nog bewerkingen, en worden vervolgens die resultaten op een werkblad gezet. Laten we zeggen dat mijn code daarop al anticipeert en dat het vooral zo gegroeid is vanuit je oorspronkelijke vraag. Het is ook een beetje de macht der gewoonte: vroeger gebruikte ik ook regelmatig copy/paste en merkte dat ik het nadien in 99% van de gevallen moest veranderen.

Transpose: vba maakt van een range altijd een 2-dimensionale array, ook als je gegevens uit één kolom of rij inleest. Met de eerste transpose maken we er een 1-dimensionale array van, en met de tweede krijgen ze terug de juiste 'richting'. Maar toegegeven, ook dat is zo'n beetje standaard syntax, afkomstig uit complexere taken.

Als je het, maar dat zal dus niet altijd en overal bruikbaar zijn (maar hier wél), op de allersimpelste manier wil doen heb je zelfs geen copy/paste nodig en kom je er bijvoorbeeld al met:
Sub Naartotaal()

Application.ScreenUpdating = False
Sheets("Totaal").Select
Range("C5:BB500").ClearContents
For c = 3 To Cells(4, Columns.Count).End(xlToLeft).Column
    With Sheets("Berekening")
        .Cells(4, 6) = Cells(4, c)
        Cells(5, c).Resize(7).Value = .Cells(5, 6).Resize(7).Value
    End With
Next c
MsgBox "Klaar"
   
End Sub

Mvg,
Molly
Windows 11 Home NLD 64bit
11th Gen Intel(R) Core(TM) i7-11700 @ 2.50GHz 2496
Aspire TC-1660
Intel(R) UHD Graphics 750 1024MB
476 GB SSD KINGSTON OM8PCP3512F-AA
1863 GB HD Seagate ST2000DM008-2FR102
Office 2021 Professional Plus NLD 64bit

Offline JessiePeters

  • Lid
  • *
  • Berichten: 19
  • Geslacht: Vrouw
  • Hey, ik ben nieuw hier !
Re: Wegschrijven Data Macro
« Reactie #22 Gepost op: 26 november 2022, 11:18:45 »
Bedankt Molly!

Offline Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
  • To Windows or not to Windows , that's the question
Re: Wegschrijven Data Macro
« Reactie #23 Gepost op: 26 november 2022, 11:59:35 »
Hallo Jessie,
Ik wil er graag even op wijzen dat het op dit forum de bedoeling is dat iedereen er iets mag van opsteken, juist omdat we hier als 'hobby' (lees: gratis) mensen helpen. Ik zal daarom met plezier je via PB ontvangen vraag ook beantwoorden, maar dus in dit draadje.

 :thumbsup:
HP ProBook 450 G3 15 inch
OS : Windows 11 Pro NLD 64bit
Intel(R) Core(TM) i5-6200U CPU @ 2.30GHz
16 GB  Vengeance 2666 MHz
KINGSTON SA400S37480G - 447,13 GB als bootdisk
WD Blue Solid state 2 TB - intern - M.2 2280 - SATA als datadisk
AV: Windows Defender
FW: Windows Firewal

 


www.combell.com