Help!

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

Hulp bij posten

Recente topics

Auteur Topic: Energie kosten berekenen per maand verbruik  (gelezen 26926 keer)

0 leden en 1 gast bekijken dit topic.

Offline Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Energie kosten berekenen per maand verbruik
« Reactie #90 Gepost op: 17 juni 2023, 13:43:15 »
weeral dikke merci Molly ! Uw code doet het  _/-\o_
Grtjs,
Arnold.

Offline MollyVH

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 847
Re: Energie kosten berekenen per maand verbruik
« Reactie #91 Gepost op: 17 juni 2023, 14:49:53 »
Heel graag gedaan, Arnold :thumbsup:
Op naar de volgende uitdaging !

Groetjes,
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 Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Energie kosten berekenen per maand verbruik
« Reactie #92 Gepost op: 18 juni 2023, 10:52:07 »
Dag Molly  :) en anderen  :)
volgende uitdaging  ;D......
Ik mag zeggen dat ik met mijn bescheiden kennis redelijk ver ben geraakt , ik heb alle overbodige informatie uit de opgehaalde bestanden kunnen verwijderen , bij "Fluvius Elektriek" kreeg ik de waarden voor Dag en Nacht tarief onder elkaar , ik ben erin geslaagd om deze per datum naast elkaar te krijgen.
nu moet ik nog de opgehaalde data kunnen invullen op het werkblad "Dagverbruik" naast de corresponderende Datum , maar dat lukt me niet  :-[
ik geraak er maar niet uit hoe er aan te beginnen.
ik heb mijn volledige bestand bij gesloten , samen met de 2 opgehaalde bestanden , is wel wa uitgebreider maar dat maakt niets uit voor de werking ervan , er zijn ook geen parameters ingevuld....
dus eerst de waarden op hun juiste plaats krijgen , dan kan ik weer verder.
grtjs,
Arnold.

Offline MollyVH

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 847
Re: Energie kosten berekenen per maand verbruik
« Reactie #93 Gepost op: 18 juni 2023, 10:57:12 »
Hallo Arnold,

Ik nam net plaats achter mijn pc toen je nieuwe post verscheen, dus ik zal (nieuwsgierig als ik ben) meteen je vorderingen eens bekijken.
En, wie weet, misschien wel iets kunnen bedenken aangaande je nieuwste uitdaging...

Groetjes,
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 Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Energie kosten berekenen per maand verbruik
« Reactie #94 Gepost op: 18 juni 2023, 11:44:54 »
Molly,
ik hoop dat je er nog niet teveel werk hebt ingestopt , ik ben er zelf in geslaagd om de data ( alvast van Gas) in te vullen  :o !!!
mocht je toch al bezig zijn , die gerust verder , dan kijk ik hoe Jij dat hebt opgelost en kan ik weeral uit leren  :)
grtjs,
Arnold.

Offline Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Energie kosten berekenen per maand verbruik
« Reactie #95 Gepost op: 18 juni 2023, 11:58:18 »
Update : ik ben er ook in geslaagd om de data van "Elektriek" in te vullen !!!
dus alles werkt naar mijn volle tevredenheid  :).
met nogmaals dank aan Molly en aan SoftAid  _/-\o_
grtjs,
Arnold.

Offline MollyVH

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 847
Re: Energie kosten berekenen per maand verbruik
« Reactie #96 Gepost op: 18 juni 2023, 12:36:26 »
Hallo Arnold,

Je post van één minuutje geleden zet ik even on hold (begin honger te krijgen), maar dat komt ook wel goed ;)

Je copy/paste-methode zal inderdaad werken zolang (en we mogen dat gerust geloven) zowel in bron- als doelbestand alle datums netjes in volgorde onder elkaar staan.
Maak je geen zorgen, veel tijd heb ik er niet in gestoken. Hierbij dus een alternatieve aanpak (bij wijze van voorbeeld enkel voor gas) waarin ook nog wat overbodige code is verwijderd (ik kon het weer niet laten...)

Groetjes,
Molly

Edit: oei, die laatste post is terug verdwenen, toch geen schrik dat je ons te veel werk zal geven? :)
 
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 Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Energie kosten berekenen per maand verbruik
« Reactie #97 Gepost op: 18 juni 2023, 14:07:43 »
Edit: oei, die laatste post is terug verdwenen, toch geen schrik dat je ons te veel werk zal geven? :)
ja , idd , ik wou niet als lui overkomen  ;D...
nu worden de bestanden van Fluvius gedownload in mijn map "C:\Users\arnol\Downloads" onder volgende namen waarvan ik vermoed dat deze telkens veranderen naargelang de datum van de data :
Verbruikshistoriek_gas_541448820071092605_20230602_20230618_dagtotalen.csv
Verbruikshistoriek_elektriciteit_541448820071092599_20230602_20230618_dagtotalen.csv
ik verander die namen naar "Gas.csv" en "Elektriek.csv" (vroeger "Fluvius Gas" en "Fluvius Elektriek" en verplaats die dan naar mijn map waar mijn Excel bestand staat : "C:\Users\arnol\Documents\Huishouden\".....

nu was mijn vraag of ik dat niet kan "automatiseren" en die gewoon kan openen van uit mijn Excel bestand zonder te hernoemen (of wél hernoemen) en zonder te verplaatsen ?
Mvg,
Arnold.


Offline MollyVH

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 847
Re: Energie kosten berekenen per maand verbruik
« Reactie #98 Gepost op: 18 juni 2023, 14:21:46 »
We gaan voor TOP-efficiëntie, Arnold :D
Dat wordt dus zonder hernoemen en zonder verplaatsen.
En als we toch bezig zijn zou ik ook afstappen van telkens een nieuw blad in je bestand te plakken, want ik zag ondertussen dat je het in dezelfde procedure toch terug verwijdert.
Voor vandaag zit het pc-werk er ongeveer op, dus even geduld (in principe niet langer dan tot morgen ;))

Groetjes,
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 Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Energie kosten berekenen per maand verbruik
« Reactie #99 Gepost op: 18 juni 2023, 14:25:30 »
We gaan voor TOP-efficiëntie, Arnold :D
Dat wordt dus zonder hernoemen en zonder verplaatsen.
En als we toch bezig zijn zou ik ook afstappen van telkens een nieuw blad in je bestand te plakken, want ik zag ondertussen dat je het in dezelfde procedure toch terug verwijdert.
Voor vandaag zit het pc-werk er ongeveer op, dus even geduld (in principe niet langer dan tot morgen ;))

Groetjes,
Molly
ik zie er weeral naar uit , ondertussen ben ik bezig met UW code ook te gebruiken voor het invullen van de "Elektriek" data  ;)..
nog een fijne zondag  :)
grtjs,
Arnold.

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.181
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re: Energie kosten berekenen per maand verbruik
« Reactie #100 Gepost op: 18 juni 2023, 18:19:12 »
Arnold,

mijn kleine bescheiden bijdrage (waar nog fouten in zitten, maar die de weg een beetje afbakenen hoe je bij een selectie van een (datum) cel de betreffende csv kunt inlezen in je bestand.

Let op: dit is maar een ruwe schets. Qua datumnotatie in VBA ben ik geen krak, en dat zal dus nog moeten bijgeschaafd worden.

Sub Copieer_van_uit_een_gesloten_csv()

Application.ScreenUpdating = False
DatIn = SelectedCel(Day) & Selected.cel(Month) & SelectedCell(Year)
DatUit = SelectedCel(Day + 15) & Selected.cel(Month) & SelectedCell(Year)
    Set closedBook = Workbooks.Open("C:\Users\arnol\Downloads\"Verbruikshistoriek_gas_541448820071092605_" & DatIn & "_" & DatUit & "_" & "dagtotalen.csv")
    closedBook.Sheets("Fluvius Gas").Copy Before:=ThisWorkbook.Sheets(1)
    closedBook.Close SaveChanges:=False

Application.ScreenUpdating = True
End Sub

Succes en groeten,

:) SoftAid :)             
Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Energie kosten berekenen per maand verbruik
« Reactie #101 Gepost op: 18 juni 2023, 19:19:54 »
Dankuwel SoftAid , ik bekijk het even , ik had eerder gedacht om via VBA naar de map "Downloads" te gaan en via een "wildcard" het betreffende bestand te openen.
b.v. Workbooks.Open("C:\Users\arnol\Downloads\"Verbruikshistoriek_gas*.*.csv") ? in Windows kan je zo zoeken op bestanden ?
ik wacht af , momenteel werkt het vlotjes , ben benieuwd wat ook Molly zal uitwerken.
volgende week wel een heel drukke agenda....
grtjs,
Arnold.

Offline MollyVH

  • Excel-Expert
  • Oplosser
  • *****
  • Berichten: 847
Re: Energie kosten berekenen per maand verbruik
« Reactie #102 Gepost op: 18 juni 2023, 22:10:25 »
Hallo Arnold,

Een beetje eerder terug thuis dan verwacht ben ik er nog even voor gaan zitten ;)
Citaat
ik had eerder gedacht om via VBA naar de map "Downloads" te gaan en via een "wildcard" het betreffende bestand te openen
Uit mijn voorgaande berichten heb je waarschijnlijk gemerkt dat ik ook al in die richting dacht.
Maar ik heb er wel 'mijn eigen draai' aan gegeven: er staat maar één knop meer, en binnen de daarmee aangeroepen procedure wordt in je downloadmap naar 'geschikte' bestanden gezocht. Test maar eens, dat zal duidelijker zijn dan gelijk welke uitleg.
Als deze werkwijze je bevalt zullen we er best nog een kleinigheid aan toevoegen. Voor elk passend bestand zal je de vraag krijgen of het moet verrwerkt worden. Ik verwacht niet dat je de oude in downloads zal laten staan (indien wel zou je overbodige vragen krijgen).
Als we dan toch bezig zijn kunnen we er nog voor zorgen om, uiteraard geheel volgens jouw keuze, de verwerkte bestanden ofwel te deleten, ofwel naar een archiefmap te verplaatsen.
Dus laat maar weten, ook als de code niet geheel duidelijk is!

Groetjes,
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 Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Energie kosten berekenen per maand verbruik
« Reactie #103 Gepost op: 19 juni 2023, 09:13:18 »
Goedemorgen Molly  :)
jawadde , Uw 'eigen draai' werkt perfect en supersnel  \o/
enerzijds ben ik jaloers op Uw kennis , anderzijds ben ik blij dat ik deze niet heb , want mocht ik Uw kennis hebben ik denk dat ik dag en nacht zou "programmeren"  ;D
nog een heel fijne dag gewenst.
Mvg,
Arnold.

ps : U hebt me op een idee gezet i.v.m. de bestanden 'deleten' of 'wegschrijven naar een archief' , ik ga dat nu zelf proberen in te voegen......

Offline Montagnard

  • Ambassadeur
  • *****
  • Berichten: 2.385
  • Geslacht: Man
Re: Energie kosten berekenen per maand verbruik
« Reactie #104 Gepost op: 19 juni 2023, 14:42:41 »
ondertussen beetje bezig geweest , paar kleine cosmetische ingrepen en het 'deleten' van de bestanden NA het verwerken ingevoegd.
alles werkt prima , alleen krijg ik een flikkering van het scherm bij het 'deleten' ?
Mvg,
Arnold.

 


www.combell.com