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.
Het gaat om iets meer dan 200 cellen die aangepast moeten worden.quote:Op dinsdag 29 januari 2013 13:50 schreef qu63 het volgende:
[..]
cel.value='X:\rapportage\2013 week 5.xls]maandag'!$C30;
Ik kan dan inderdaad 200 keer in VBA aangeven hoe hij de celwaarde moet berekenen (en hopen dat hij er dan een formule van maakt) maar dat moet toch sneller kunnen?
Ik heb een vraagje;
Stel ik heb een hoop getallen die ik laat optellen en die komt uit op 100 (voor gemak)
Nu wil ik die 100 als 100% gebruiken.
Naast al die getallen zet ik een nieuwe reeks neer die bijvoorbeeld op 50 uitkomt, nu wil ik onder elke aantal dat er uit de reeks komt zien staan hoeveel procent dat is in vergelijking met die eerdere gestelde 100%.
Dus 100/50 (daaronder 50%)/25 (daaronder 25%)/76 (daaronder 76%) en ga zo maar door...
Hopelijk is het duidelijk
Stel ik heb een hoop getallen die ik laat optellen en die komt uit op 100 (voor gemak)
Nu wil ik die 100 als 100% gebruiken.
Naast al die getallen zet ik een nieuwe reeks neer die bijvoorbeeld op 50 uitkomt, nu wil ik onder elke aantal dat er uit de reeks komt zien staan hoeveel procent dat is in vergelijking met die eerdere gestelde 100%.
Dus 100/50 (daaronder 50%)/25 (daaronder 25%)/76 (daaronder 76%) en ga zo maar door...
Hopelijk is het duidelijk
Eigenlijk niet echt, maar ik wil wel wat gokken:quote:
Zorg in ieder geval dat al die kolom-totalen in dezelfde rij uitkomen. Ik neem voor het gemak even aan dat die totalen in rij 37 staan. En dat je referentie-totaal (de gestelde 100%) in kolom A staat.
In B38 zet je dan =B37/$A37 en die formule kopieer je door naar rechts. De celeigenschappen van heel rij 38 stel je in op Percentage met het gewenste aantal decimalen.
Als je bedoelt wat ik denk, dan zou dit goed moeten gaan.
Opinion is the medium between knowledge and ignorance (Plato)
Mijn excuus..quote:
[..]
Eigenlijk niet echt, maar ik wil wel wat gokken:
Zorg in ieder geval dat al die kolom-totalen in dezelfde rij uitkomen. Ik neem voor het gemak even aan dat die totalen in rij 37 staan. En dat je referentie-totaal (de gestelde 100%) in kolom A staat.
In B38 zet je dan =B37/$A37 en die formule kopieer je door naar rechts. De celeigenschappen van heel rij 38 stel je in op Percentage met het gewenste aantal decimalen.
Als je bedoelt wat ik denk, dan zou dit goed moeten gaan.
Als wat jij zegt niet werkt dan zal ik ff een voorbeeldplaatje maken met wat ik bedoel
Ik snap er eigenlijk niets van. Als je week 1 invult heb je week 5 nodig?quote:Op dinsdag 29 januari 2013 13:38 schreef Orealo het volgende:
Excelkoningen,
Ik ben redelijk bedreven in formules, maar VBA is nogal nieuw voor me. Ik heb een probleem met een verwijzingsbestand. De gebruiker voort een aantal gegevens in (zeg dag en week) en vervolgens tovert de sheet de juiste link naar voren, in de vorm van een verwijzing. Dus stel:
Gebruiker voert in: week 1, dag dinsdag.
De sheet maakt dan in een cel de volgende verwijzing: "='X:\rapportage\2013 week 5.xls]maandag'!$C30"
Als ik vervolgens de verwijzing kopieer in notepad en weer plak wordt de verwijzing gepakt en komen de juiste gegevens naar voren.
Ik wil dat laatste nu met VBA doen, maar zonder omslachtig via VBA notepad te laten openen hoop ik dat er een makkelijkere methode bestaat.. Weten jullie daar iets van?
Vervolgens heb je het over dat de verwijzing wordt 'gepakt'. Bedoel je dat er een hyperlink van wordt gemaakt?
Zoek je gewoon iets van:
ActiveCell.FormulaR1C1 = "=HYPERLINK(""x:\rapportage\2013 week" & A1 & ".xls"")"
Het werkt maar hij zegt inplaats van 100% dat het een 1% is, dus als ik 50% eraf haal krijg ik niet 100/50 maar 1/0,5..quote:
[..]
Eigenlijk niet echt, maar ik wil wel wat gokken:
Zorg in ieder geval dat al die kolom-totalen in dezelfde rij uitkomen. Ik neem voor het gemak even aan dat die totalen in rij 37 staan. En dat je referentie-totaal (de gestelde 100%) in kolom A staat.
In B38 zet je dan =B37/$A37 en die formule kopieer je door naar rechts. De celeigenschappen van heel rij 38 stel je in op Percentage met het gewenste aantal decimalen.
Als je bedoelt wat ik denk, dan zou dit goed moeten gaan.
Er moeten dus twee nullen bij
Opgelost, thanks
Ik ben niet zo goed in uitleggen.quote:
[..]
Ik snap er eigenlijk niets van. Als je week 1 invult heb je week 5 nodig?
Vervolgens heb je het over dat de verwijzing wordt 'gepakt'. Bedoel je dat er een hyperlink van wordt gemaakt?
Zoek je gewoon iets van:
ActiveCell.FormulaR1C1 = "=HYPERLINK(""x:\rapportage\2013 week" & A1 & ".xls"")"
Maar wat ik bedoel is dat de gebruiker door het invullen van twee velden zelf de verwijzing maakt naar het juiste excelbestand. De waarde die benodigd is komt uit dat excelbestand, uit een tabblad die dat de gebruiker aangeeft (maandag, dinsdag, etc).
Met ActiveCell kan ik dat invullen. Maar het is voor 200+ cellen bedoeld en dan ben ik nog wel even bezig.
Probeer eens wat met "indirect"quote:Op woensdag 30 januari 2013 18:24 schreef Orealo het volgende:
[..]
Ik ben niet zo goed in uitleggen.
Maar wat ik bedoel is dat de gebruiker door het invullen van twee velden zelf de verwijzing maakt naar het juiste excelbestand. De waarde die benodigd is komt uit dat excelbestand, uit een tabblad die dat de gebruiker aangeeft (maandag, dinsdag, etc).
Met ActiveCell kan ik dat invullen. Maar het is voor 200+ cellen bedoeld en dan ben ik nog wel even bezig.
met macro moet je een loop bouwen of iets kopieren.
zonder macro kan je ook gebruik maken van iets als:
=HYPERLINK("file://c:/test/"&A1&".xlsx";"link")
waarbij A1 natuurlijk je random tekst is.
zonder macro kan je ook gebruik maken van iets als:
=HYPERLINK("file://c:/test/"&A1&".xlsx";"link")
waarbij A1 natuurlijk je random tekst is.
Bedoel je dat die link niet standaard klikbaar is direct?quote:
Excelkoningen,
Ik ben redelijk bedreven in formules, maar VBA is nogal nieuw voor me. Ik heb een probleem met een verwijzingsbestand. De gebruiker voort een aantal gegevens in (zeg dag en week) en vervolgens tovert de sheet de juiste link naar voren, in de vorm van een verwijzing. Dus stel:
Gebruiker voert in: week 1, dag dinsdag.
De sheet maakt dan in een cel de volgende verwijzing: "='X:\rapportage\2013 week 5.xls]maandag'!$C30"
Als ik vervolgens de verwijzing kopieer in notepad en weer plak wordt de verwijzing gepakt en komen de juiste gegevens naar voren.
Ik wil dat laatste nu met VBA doen, maar zonder omslachtig via VBA notepad te laten openen hoop ik dat er een makkelijkere methode bestaat.. Weten jullie daar iets van?
Met =HYPERLINK() wordt-ie dat wel idd, zoals diverse mensen al aangaven.
Ik heb meer een algoritme nodig die ik in Excel wil programmeren. Ik heb de volgende lijst met waardes:
1: 0,07 | 2: 0,45 | 3: 0,3 | 4: 0,2 | 5: 0,5 | 6: 0,2 | 7: 0,28 | 8: 0,40 | 9> 0,53 | 10: 0,5 | 11: 0,5.
(nog heel veel meer). Deze waardes kun je zien als dozen met een bepaalde inhoud die op een pallet moeten komen.
Nu zou ik willen dat Excel terugkomt met de optimale samenstelling waarbij:
1) het niet uitmaakt of er 2 of meerdere componenten op 1 palet komen
2) De inhoud mag nooit boven 1 komen
3) Vaak is er geen combinatie mogelijk die tot 1 komt
4) Zo weinig mogelijk pallets moeten worden gebruikt
In het bovenstaande voorbeeld zou optimaal zijn:
Pallet 1: 1 + 8 + 9 => 0,07 + 0,4 + 0,53 = 1
Pallet 2: 10 + 11 => 0,5 + 0,5 = 1
Pallet 3: 3 + 4 + 5 => 0,3 + 0,2 + 0,5 = 1
Pallet 4: 2 + 6 + 7 => 0,45 + 0,2 + 0,28 = 0,93
Pfff opschrijven duurt al een half uur. Ik hoop dat iemand een slim algoritme weet. Thx alvast!
1: 0,07 | 2: 0,45 | 3: 0,3 | 4: 0,2 | 5: 0,5 | 6: 0,2 | 7: 0,28 | 8: 0,40 | 9> 0,53 | 10: 0,5 | 11: 0,5.
(nog heel veel meer). Deze waardes kun je zien als dozen met een bepaalde inhoud die op een pallet moeten komen.
Nu zou ik willen dat Excel terugkomt met de optimale samenstelling waarbij:
1) het niet uitmaakt of er 2 of meerdere componenten op 1 palet komen
2) De inhoud mag nooit boven 1 komen
3) Vaak is er geen combinatie mogelijk die tot 1 komt
4) Zo weinig mogelijk pallets moeten worden gebruikt
In het bovenstaande voorbeeld zou optimaal zijn:
Pallet 1: 1 + 8 + 9 => 0,07 + 0,4 + 0,53 = 1
Pallet 2: 10 + 11 => 0,5 + 0,5 = 1
Pallet 3: 3 + 4 + 5 => 0,3 + 0,2 + 0,5 = 1
Pallet 4: 2 + 6 + 7 => 0,45 + 0,2 + 0,28 = 0,93
Pfff opschrijven duurt al een half uur. Ik hoop dat iemand een slim algoritme weet. Thx alvast!
De oplossing zit in de Solver van Excel (Oplosser in het Nederlands).
Je moet hiervoor via de Excel opties de Oplosser Invoegtoepassing activeren.
Door middel van deze tool kan je restricties opgeven en de optimale waarde opzoeken.
Voorbeeld:
http://www.mijnbestand.nl/Bestand-ZEVNCEM77J87.xlsx
(in de gekleurde cellen kun je de maten wijzigen en door de solver te gebruiken gaat hij de combinaties zoeken die werken.
[ Bericht 37% gewijzigd door snabbi op 01-02-2013 01:12:36 ]
Je moet hiervoor via de Excel opties de Oplosser Invoegtoepassing activeren.
Door middel van deze tool kan je restricties opgeven en de optimale waarde opzoeken.
Voorbeeld:
http://www.mijnbestand.nl/Bestand-ZEVNCEM77J87.xlsx
(in de gekleurde cellen kun je de maten wijzigen en door de solver te gebruiken gaat hij de combinaties zoeken die werken.
[ Bericht 37% gewijzigd door snabbi op 01-02-2013 01:12:36 ]
Geen idee of ik het hier juist vraag, maar heb een grote kans dat jullie het weten....
Ik wil graag de taal van Excel/Office 2013 veranderen.
Prive heb ik van de week Office 2013 in het Nederlands geïnstalleerd, op het werk gebruik in een Engelstalige versie waar ik dus liever iets mee doe. (op google zoeken in het Engels naar formules werkt ook wat beter).
Anyway ik krijg 'm dus niet in het Engels
Ik heb een language pack voor Win8 geinstalleerd (gewoon via Config. Scherm, maar dat doet ie zo snel dat ik me niet kan voorstellen dat die heel dat pakket zo heeft gedownload).
Als ik dat instel dan is de helft van m'n menu's in Win8 idd in het Engels maar Office helaas niet.
Ook de mogelijkheid Engels in te stellen lukt niet binnen Office.
Iemand enige tips?
Ik wil graag de taal van Excel/Office 2013 veranderen.
Prive heb ik van de week Office 2013 in het Nederlands geïnstalleerd, op het werk gebruik in een Engelstalige versie waar ik dus liever iets mee doe. (op google zoeken in het Engels naar formules werkt ook wat beter).
Anyway ik krijg 'm dus niet in het Engels
Ik heb een language pack voor Win8 geinstalleerd (gewoon via Config. Scherm, maar dat doet ie zo snel dat ik me niet kan voorstellen dat die heel dat pakket zo heeft gedownload).
Als ik dat instel dan is de helft van m'n menu's in Win8 idd in het Engels maar Office helaas niet.
Ook de mogelijkheid Engels in te stellen lukt niet binnen Office.
Iemand enige tips?
N/A
Disclaimer: ik ben geen expert maar shitposter, dit is geen advies en aan deze post zijn geen rechten te ontlenen
Disclaimer: ik ben geen expert maar shitposter, dit is geen advies en aan deze post zijn geen rechten te ontlenen
Dit zou moeten werken: http://office.microsoft.c(...)ams-HA010356057.aspxquote:
Geen idee of ik het hier juist vraag, maar heb een grote kans dat jullie het weten....
Ik wil graag de taal van Excel/Office 2013 veranderen.
Prive heb ik van de week Office 2013 in het Nederlands geïnstalleerd, op het werk gebruik in een Engelstalige versie waar ik dus liever iets mee doe. (op google zoeken in het Engels naar formules werkt ook wat beter).
Anyway ik krijg 'm dus niet in het Engels
Ik heb een language pack voor Win8 geinstalleerd (gewoon via Config. Scherm, maar dat doet ie zo snel dat ik me niet kan voorstellen dat die heel dat pakket zo heeft gedownload).
Als ik dat instel dan is de helft van m'n menu's in Win8 idd in het Engels maar Office helaas niet.
Ook de mogelijkheid Engels in te stellen lukt niet binnen Office.
Iemand enige tips?
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]
Die had ik idd al gevonden maar helaas (al ging ik er wel vanuit dat de Win7 instructies ook van toepassing zijn op Win8) dat werkte niet.quote:
[..]
Dit zou moeten werken: http://office.microsoft.c(...)ams-HA010356057.aspx
N/A
Disclaimer: ik ben geen expert maar shitposter, dit is geen advies en aan deze post zijn geen rechten te ontlenen
Disclaimer: ik ben geen expert maar shitposter, dit is geen advies en aan deze post zijn geen rechten te ontlenen
welke versie van office? Office starter kan bijvoorbeeld niet van taal wisselen.
Als je in office de taal wil wisselen van de menu's enzo doe je dat normaliter als volgt:
file, options, languages, en dan bij overal voor engels kiezen (of match windows default als dat ook enegels is)
Als je in office de taal wil wisselen van de menu's enzo doe je dat normaliter als volgt:
file, options, languages, en dan bij overal voor engels kiezen (of match windows default als dat ook enegels is)
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
held!quote:
De oplossing zit in de Solver van Excel (Oplosser in het Nederlands).
Je moet hiervoor via de Excel opties de Oplosser Invoegtoepassing activeren.
Door middel van deze tool kan je restricties opgeven en de optimale waarde opzoeken.
Voorbeeld:
http://www.mijnbestand.nl/Bestand-ZEVNCEM77J87.xlsx
(in de gekleurde cellen kun je de maten wijzigen en door de solver te gebruiken gaat hij de combinaties zoeken die werken.
Is het ook mogelijk om dit met een formule aan te sturen? Thx alvast!
Nee. Het probleem wat je beschrijft noemen we in de wiskunde lineair programmeren. Het is een optimaliseringsprobleem. Je formule approach zou betekenen dat er maar 1 uitkomst is, dat is niet zo. Er zijn meerdere uitkomsten maar er is er maar 1 (of meerdere) de beste.quote:
[..]
held!
Is het ook mogelijk om dit met een formule aan te sturen? Thx alvast!
Wel kan je natuurlijk gewoon alle waarden aanpassen en via de solver iedere keer opnieuw de beste uitrekenen. Wel moet je je even verdiepen in hoe ik die constraints voor je hebt gebouwd.
ok je bent een kanjer! Die contraints snap ik wel redelijk maar ik vraag me toch af of ik dat niet wat dynamisch kan maken. Ik weet namelijk niet of ik 5 of 15 pallets nodig heb. Ik zit zelf te denken aan ok dan de contraints wat ruimer op te zetten en ook het aantal pallets. Is het dan geen probleem als er een aantal pallets niet gevuld zijn?quote:
[..]
Nee. Het probleem wat je beschrijft noemen we in de wiskunde lineair programmeren. Het is een optimaliseringsprobleem. Je formule approach zou betekenen dat er maar 1 uitkomst is, dat is niet zo. Er zijn meerdere uitkomsten maar er is er maar 1 (of meerdere) de beste.
Wel kan je natuurlijk gewoon alle waarden aanpassen en via de solver iedere keer opnieuw de beste uitrekenen. Wel moet je je even verdiepen in hoe ik die constraints voor je hebt gebouwd.
Ik probeer hem even na te bouwen maar als ik dan de constraint: $B$2:$K$4 =geheeltallig wil wijzigen naar wat groter bereik krijg ik de melding: "een randvoorwaarde moet een getal, verwijziging of formule met een numerieke waarde zijn". Wat doe ik verkeerd?quote:
[..]
Nee. Het probleem wat je beschrijft noemen we in de wiskunde lineair programmeren. Het is een optimaliseringsprobleem. Je formule approach zou betekenen dat er maar 1 uitkomst is, dat is niet zo. Er zijn meerdere uitkomsten maar er is er maar 1 (of meerdere) de beste.
Wel kan je natuurlijk gewoon alle waarden aanpassen en via de solver iedere keer opnieuw de beste uitrekenen. Wel moet je je even verdiepen in hoe ik die constraints voor je hebt gebouwd.
Tools als matlab zijn er beter geschikt voor complexere problemen. Ook zou je het na kunnen bouwen in een programmeertaal.
ik had voor het aantal pallets nog zitten kijken naar het toevoegen van een extra voorwaarde in je doelcel, door het aantal pallets zo klein mogelijk te maken. Heb dit ook niet zo snel werkend gekregen.
Voor war betreft de foutmelding. Let goed op dat je in een constraint maar 1 bereik kan opgeven. dus wanneer je er van maakt $B$2:$K$10 INT kan het wel, maar niet wanneer je 2 bereiken in 1 constraint zet.
Tot slot je kan ook alleen de int afdwingen op cellen die ook zijn aangemerkt als cellen die veranderen mogen.
ik had voor het aantal pallets nog zitten kijken naar het toevoegen van een extra voorwaarde in je doelcel, door het aantal pallets zo klein mogelijk te maken. Heb dit ook niet zo snel werkend gekregen.
Voor war betreft de foutmelding. Let goed op dat je in een constraint maar 1 bereik kan opgeven. dus wanneer je er van maakt $B$2:$K$10 INT kan het wel, maar niet wanneer je 2 bereiken in 1 constraint zet.
Tot slot je kan ook alleen de int afdwingen op cellen die ook zijn aangemerkt als cellen die veranderen mogen.
Vraag:
Ik heb een excel bestand met ongeveer 400 rijen.
Nu wil ik echter onder iedere rij een lege rij toevoegen..
Dus feitelijk komen dan de waarden in de oneven rijen te staan en de even rijen zijn leeg..
Ik krijg het echter niet voor elkaar om dit bij alle rijen tegelijk te doen.. Iemand een idee?
Ik heb een excel bestand met ongeveer 400 rijen.
Nu wil ik echter onder iedere rij een lege rij toevoegen..
Dus feitelijk komen dan de waarden in de oneven rijen te staan en de even rijen zijn leeg..
Ik krijg het echter niet voor elkaar om dit bij alle rijen tegelijk te doen.. Iemand een idee?
“It's gonna be legend-... wait for it... and I hope you're not lactose intolerant because the second half of that word is DAIRY!”
Volgens mij kan dat niet subtiel. De onsubtiele manier is om op een leeg werkblad een rij getallen 1..800 in kolom A te zetten, in kolom B een combi ALS/INDEX* te zetten en dan vervolgens met waarden plakken alles weer terug te zetten op je oorspronkelijke werkblad.
SPOILEROm spoilers te kunnen lezen moet je zijn ingelogd. Je moet je daarvoor eerst gratis Registreren. Ook kun je spoilers niet lezen als je een ban hebt.Opinion is the medium between knowledge and ignorance (Plato)
quote:
Volgens mij kan dat niet subtiel. De onsubtiele manier is om op een leeg werkblad een rij getallen 1..800 in kolom A te zetten, in kolom B een combi ALS/INDEX* te zetten en dan vervolgens met waarden plakken alles weer terug te zetten op je oorspronkelijke werkblad.Of op deze manier: http://www.pcmag.com/article2/0,2817,1785247,00.aspSPOILEROm spoilers te kunnen lezen moet je zijn ingelogd. Je moet je daarvoor eerst gratis Registreren. Ook kun je spoilers niet lezen als je een ban hebt.It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
Ik ben wat aan het oefenen met macro's. Deze zou het witregelprobleem moeten tackelen.
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | Sub witregel() Dim rw As Integer Dim x As Integer rw = Cells.SpecialCells(xlCellTypeLastCell).Row x = 0 For i = 0 To rw Range("A1").Offset(x, 0).Select ActiveCell.EntireRow.Insert x = x + 2 Next i End Sub |
Aldus.
| Forum Opties | |
|---|---|
| Forumhop: | |
| Hop naar: | |