[Excel] Het grote Excel vragen topic #37

quote:

Op woensdag 10 juli 2013 18:21 schreef Sjechov het volgende:

[..]

Even ter verduidelijking.
Hoe moet ik nu die formule maken?

[ afbeelding ]

[ afbeelding ]

quote:

Op woensdag 10 juli 2013 18:43 schreef Sjechov het volgende:
Ik ga eens kijken.
Die maanden zijn niet meer leeg, maar ik was aan het vullen.
Code V kan ik natuurlijk ook 0 uur aan toekennen, dan is het ook direct duidelijk.
Dank voor het snelle antwoord!

quote:

Op woensdag 10 juli 2013 18:51 schreef Sjechov het volgende:
Werkt als gehoopt!
Dank voor je tijd en moeite!

quote:

Op woensdag 10 juli 2013 19:41 schreef qu63 het volgende:

Maar nu moet ik dus op zoek naar de bedragen. Deze staan dus niet altijd op dezelfde positie en zijn ook niet altijd even lang. Ze staan wel altijd 3 posities na "Bij" of "Af". Zoeken op dubbele aanhalingstekens werkt helaas niet. Iemand anders een oplossing?

quote:

Op woensdag 10 juli 2013 20:57 schreef snabbi het volgende:
Lang leven de optie voor tekst naar kolommen. Dat maakt het toch een stuk eenvoudiger.

quote:

Op woensdag 10 juli 2013 20:14 schreef Basp1 het volgende:

[..]

De text postie van bij of af in de string bepalen en dan met wat links rechts spelen om het cijfer te vinden, ik neem aan dat bij het cijfer ook altijd nog een punt of komma gebruikt wordt voor de cent.

quote:

Op woensdag 10 juli 2013 21:55 schreef qu63 het volgende:

[..]

Zo ver was ik ook al, maar nu nog uitzoeken hoe lang het getal is. Dan moet ik op zoek naar de tweede komma en vanaf die positie weer 2 tekens aftrekken. Maar hoe vind ik die 2e komma?

quote:

Op woensdag 10 juli 2013 22:02 schreef Basp1 het volgende:

[..]

Met een kleine vba macro moet dat toch wel lukken. Ik zou eerst dan de string inkorten tot het begin van het getal, dus 3 posties na de bij of af dan hoef je alleen nog maar de komma te vinden, en 2 posties verder weer de string af te kappen.

quote:

Sub qu63
Dim numberofrows As Integer
If [a3] <> "" Then
Range("A1").Select
Selection.End(xlDown).Select
numberofrows = ActiveCell.Row
Else
numberofrows = 2
End If
Windows("geld.xls").Activate
Rows("2:" & numberofrows).Select
Selection.Insert Shift:=xlDown
Windows(mijnnaam).Activate
Range("a2:a" & numberofrows).Cut
Windows("bestand.xls").Activate
Range("A2").Select
ActiveSheet.Paste

Selection.TextToColumns Destination:=Range("A2"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=True, Space:=False, Other:=False, FieldInfo _
:=Array(Array(1, 4), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), _
Array(7, 1), Array(8, 1), Array(9, 1)), TrailingMinusNumbers:=True
Columns("A:A").NumberFormat = "m/d/yyyy"

Dim myrow As Range
For Each myrow In Range("F1:F" & numberofrows + 1)
If myrow.Value = "Af" And myrow.Offset(0, 1) > 0 Then
myrow.Offset(0, 1).Value = "-" & Replace(myrow.Offset(0, 1).Value, ",", ".")
End If
Next myrow
Range("K2").Select
If ActiveCell.Value <> "" Then End
While ActiveCell.Value = ""
ActiveCell.Offset(1, 0).Select
Wend
Dim i As Integer
i = ActiveCell.Row
Range("J" & i & ":M" & i + 1).Select
Selection.AutoFill Destination:=Range("J2:M" & i + 1), Type:=xlFillDefault

End Sub

quote:

Op woensdag 10 juli 2013 22:49 schreef snabbi het volgende:
Zo simpel mogelijk is alles in een macro
Open je Excel. Download het bestandje van de site. Vanuit dit gedownloadde bestand vervolgens F9 om de macro te runnen en de rest gaat vanzelf. (anders moet je zus nog dingen lopen kopieren enzo)

[..]

Ik gebruik .xls want daar had je nog niet dat gezeur met xlsm
De macro kopieert de logica die ik zelf had gebouwd en had toegevoegd in de laatste 3 kolommen. In deze kolommen heb ik zelf via vlookups een categorie gemaakt op basis van tegenrekening. Je zal alleen zelf iets moeten bouwen voor de nieuwe IBAN structuur.

quote:

Op woensdag 10 juli 2013 23:52 schreef snabbi het volgende:
de csv is het bestand dat je constant weg gooit en je excel bestand is wat je transacties over een langere periode kan bewaren.

doordat je de naam van je vaste excel bestand weet, heb je de csv actief staan en kan je switchen van je csv naar het bestand waar je de naam wel van weet.

Enige waar je op moet letten is dat het juiste tabblad is geselecteerd, via PM voorbeeld gestuurd.

quote:

'dit moet het csv bestand van ING voorstellen qua naam voor Excel
Dim mijnnaam As String
mijnnaam = ActiveWorkbook.Name
'aantal regels
Dim numberofrows As Integer
If [a3] <> "" Then
Range("A1").Select
Selection.End(xlDown).Select
numberofrows = ActiveCell.Row
Else
numberofrows = 2
End If
Windows("Format financieren.xlsx").Activate
Sheets("Transacties_Raw").Select
'hier zorgen we dat je genoeg nieuwe regels krijgt om vanaf bovenaf aan te vullen
Rows("2:" & numberofrows).Select
Selection.Insert Shift:=xlDown
Windows(mijnnaam).Activate
Range("a2:a" & numberofrows).Cut
Windows("Format financieren.xlsx").Activate
Range("A2").Select
ActiveSheet.Paste

quote:

Op woensdag 10 juli 2013 18:07 schreef qu63 het volgende:

[..]

Nou ja, het is wel makkelijk als je al je data in Excel hebt dat je het dan ook leuk weer kan geven

Maar voor de meeste dingen zal wel specifieke software geschreven zijn die standaard in die branche is

quote:

Op donderdag 11 juli 2013 09:37 schreef Holy_Goat het volgende:
Momenteel ben ik overigens bezig met een stukje optimalisatie. Weet niet of jij / iemand anders er ook verstand van hebt, maar heb er een vraag bij:

quote:

Op donderdag 11 juli 2013 11:52 schreef qu63 het volgende:

[..]

Voor optimalisatie kom ik altijd hier heen

En mijn sheets hebben (gelukkig) nooit zoveel datapoints dat optimalisatie nodig is. MOA en MOU uit de OP zijn voor mij dan vaak voldoende (al heb ik ze pas 1x echt geïmplementeerd)

quote:

Op donderdag 11 juli 2013 13:42 schreef Holy_Goat het volgende:

[..]

ik kom de laatste tijd meuk tegen (werk) waarin meerdere workbooks van 200mb+ aan elkaar geknoopt moeten worden ter analyse

quote:

Op donderdag 11 juli 2013 09:37 schreef Holy_Goat het volgende:
edit: heb de vraag zelf al beantwoord. Weet niet precies waarom het antwoord ook echt zo is, maar empirisch vastgesteld dat het zo is. Lezen is alleen interessant als je geinteresseerd bent (eventueel) in snelheidsoptimalisatie van je macro's in excel

[..]

oh zeker weten ja

Momenteel ben ik overigens bezig met een stukje optimalisatie. Weet niet of jij / iemand anders er ook verstand van hebt, maar heb er een vraag bij:

Zou optie1 vergeleken optie 2 veel inefficienter zijn?

1) N 1-d arrays met lengte L, in een array gestopt
2) 1 NxL 2-d array

oproepen van willekeurige data kan voor de verschillende opties op de manieren:
1) array(1 .. N)(1 .. L)
2) array(1 .. N, 1 .. L)

Het voordeel is voor mij dat ik verschillende kolommen van verschillende sheets eenvoudig in de array kan stoppen met methode 1 met bv
[ code verwijderd ]

en dit gaat een stuk minder eenvoudig (heb iig nog geen methode gevonden zonder te handmatig te loopen) bij methode 2. Weet niet hoe ik makkelijk / efficient verschillende even lange ranges in een 2d array stoppen kan.

Alleen de vraag is nu, is het oproepen van data in methode 1 veel inefficienter dan in methode 2? De array populaten is in methode 1 dan wel sneller, maar 21098312098 keer iets opvragen is wellicht weer sneller in methode 2?

Gedachte hierachter is dat ik het idee heb dat methode 1 eerst een array ergens uit op moet halen en daarna pas het item daaruit kan vissen, terwijl methode 2 directe toegang heeft tot het juiste element...

------------------
achterliggend verhaaltje: ben bezig met een proof of concept projectje, een worksheetfunction welke zeer snel de juiste data uit een tabel kan fietsen, gebruik makend van sql-achtige statements in een query. (ja ik weet dat je ook echt via odbc een connectie naar eigen werkblad kan opzetten, maar gaat om het idee).

Een en ander werkt overigens al prima, alleen is de eerste keer de query opbouwen nog traag en dit wil ik verbeteren (omdat het kan). Na opbouwen kost een query ong 0.0001 seconde, waardoor het in een lijst van 30.000+ regels alsnog sneller is dan gangbare vlookup/sumif combinaties.
[ code verwijderd ]

Edit: een en ander empirisch vergeleken. Bij een tabelgrootte van 15000 regels en 10 kolommen, kost het opzoeken van 1.000.000 waarden gemiddeld 10% minder tijd bij het gebruik van optie 1 (een array met daarin meerdere arrays) dan bij het gebruik van een grote 2D array. Let wel, we hebben het over ordegrootte ~0.01 seconden verschil. Not much, maar toch Om eea af te sluiten ook nog een korte vergelijking met het gebruik van de kolommen met data in een dictionary. Voor 1000 (1000x minder!) willekeurige requests was gemddeld al 0.88 seconde nodig . Dit maakt het gebruik van dictionaries dus ~10.000 x langzamer. Niet doen dus.

nog even onder elkaar:

inladen
[ code verwijderd ]

Tests welke 100x worden uitgevoerd met 1.000.000 (1.000 bij dict) willekeurige row en cols.
[ code verwijderd ]

quote:

Op
donderdag 11 juli 2013 14:03 schreef ralfie het volgende:

[..]

Ongetwijfeld klopt je bewering dat optie2 beter is als optie1 wanneer je het over lower level talen hebt, maar in vba wordt data niet direct via de index opgehaald (immers, je kunt een array van 85-100 laten lopen ipv 0-15) dus er wordt altijd een extra lookup gedaan per dimensie van je array. Hierdoor zal het ophalen van data niet wezenlijk anders zijn tussen geneste en tweedimensionale arrays.

Heb voor de gein een testje gemaakt (100*10000 assigns, 3 miljoen random reads met wegschrijven naar het werkblad):
[ code verwijderd ]

Zoals je ziet is [][] in beide gevallen trager, maar bij het lezen zijn de verschillen minimaal. Ik heb het idee dat de verschillen meer te maken hebben met wat processen op de achtergrond doen, aangezien ik moeite moest doen deze getallen niet precies hetzelfde te krijgen. Zonder de getallen elke keer weg te schrijven naar een werkblad presteren beide arrays ongeveer hetzelfde (de ene keer is de ene wat sneller, de andere keer de andere).

Ik gok (als ik het zo gauw bekijk) dat je tijdswinst eerder zit in het direct kopieren van een range-achtig object naar een array.

Als je vaker dit soort ongein tegenkomt, waarom implementeer je niet wat code in C# of C. De overhead ben je snel overheen wanneer je dit soort dingen gaat doen.

quote:

Op donderdag 11 juli 2013 20:11 schreef Holy_Goat het volgende:

[..]

Daar wil ik wel iets meer over weten. Echter, dit kan waarschijnlijk niet zó ingesteld worden dat het ook overal werkt , zonder extra bestanden mee te moeten sturen / installs nodig heb? Vooral op locaties zonder enig admin rechten ben je snl de sjaak.

Het viel mij overigens enorm op dat het gebruik maken van dictionaries zo mega veel trager is. Is dat niet raar?

quote:

Op donderdag 11 juli 2013 20:37 schreef ralfie het volgende:

[..]

Je zult wel op zijn minst een dlltje mee moeten zenden ja. Admin rechten maakt niets uit, maar een extra (.dll)bestandje is op zijn minst wel nodig ja. Zolang een overactieve system admin dlls niet blokkeert en de pc redelijk up to date is zouden er geen problemen moeten zijn.

En ik kan me voorstellen dat dictionaries met dergelijke hoeveelheden trager zijn ja. Ik geloof nooit dat de implementatie ervan in vb(a) nou zo optimaal is. Immer voor dergelijke hoeveelheden pakken mensen eerder een database-achtig iets of een andere omgeving.

quote:

Op maandag 22 juli 2013 09:41 schreef Locutus-of-Borg het volgende:
Ik heb een sheet met gegevens van verschillende projecten (elk project staat op een rij). De projecten zijn verdeeld in verschillende categorieën (welke categorie elk project in valt, staat in een kolom). Het ziet er dus zo ongeveer uit:
naam beginjaar categorie eindjaar etc

Nu wil ik sheets per categorie toevoegen. In deze sheet moeten dus alleen de projecten komen die in één bepaalde categorie vallen. Met de if/als-functie kan ik het wel voor elkaar krijgen, maar dan komen er (veel) lege rijen in de sheets. Hoe doe ik dit dat er in elke sheet (van de categorie) alleen de projecten van die categorie komen? En het liefst dat ik dus kan kiezen welke gegevens (kolommen) uit de (moeder)sheet overgenomen worden in de (categorie)sheet.

quote:

Op maandag 22 juli 2013 09:42 schreef DroogDok het volgende:

[..]

Verticaal zoeken proberen.

quote:

Op maandag 22 juli 2013 10:31 schreef Locutus-of-Borg het volgende:

[..]

Dat is een goede suggestie. Alleen voor zover ik het nu kan zien kun je dan maar één waarde teruggeven. Als er dus meerdere waardes aan de voorwaarde voldoen, is verticaal zoeken niet handig.

Ik probeer het nu met filter.

quote:

Op donderdag 18 juli 2013 06:32 schreef Holy_Goat het volgende:
Je kunt wel merken dat het vakantie is al een week niets gepost hier.

quote:

Op maandag 22 juli 2013 10:44 schreef PAAC het volgende:

[..]

Viel mij ook al op ja.
Zelf heb ik de afgelopen 3 weken amper m'n laptopje gezien door een ander project (waarvoor ik mijn laptop niet nodig heb)

quote:

Op maandag 22 juli 2013 10:44 schreef DroogDok het volgende:

[..]

De zoekwaarde kan (denk ik) ook een OF-functie zijn.
Maar filter is inderdaad een makkelijkere oplossing.

quote:

Op maandag 22 juli 2013 11:17 schreef Holy_Goat het volgende:

[..]

Alleen jammer dat je daarna geen kont meer kunt doen met die filter waarden. Naja, dat kan wel met getpivotdata, maar heel handig is het niet.

quote:

Op maandag 22 juli 2013 11:15 schreef Holy_Goat het volgende:

[..]

Mensen die buiten komen

quote:

Op maandag 22 juli 2013 12:22 schreef Locutus-of-Borg het volgende:

[..]

Hoe bedoel je dat precies, dat je er 'geen kont meer mee kunt doen'? Ik lees bepaalde waarde onder de voorwaarde (aangegeven in de filter) uit en geef deze in een de nieuwe sheet weer. Aan de hand van deze gefilterde database kan ik toch grafieken (per voorwaarde) gaan plotten?

quote:

Op woensdag 24 juli 2013 22:11 schreef LogiteX het volgende:
In Excel 2007 heb ik onderstaande tabel. Ik wil hier een grafiek van maken:
- op de X as de jaren
- op de Y as de winst
- vervolgens (en dit is het moeilijke gedeelte) 2 lijnen in dezelfde grafiek: een voor Urk, de ander voor Ede.
Het lukt me alleen niet, wat ik ook probeer, met Google kon ik het ook niet direct vinden

De enige oplossing die ik wist is sorteren op Stad en vervolgens 2 keer die data aan de grafiek toevoegen. Je snapt echter dat mijn tabel in de praktijk zich daar niet makkelijk voor leent.

bij voorbaat dank
[ code verwijderd ]

quote:

Op woensdag 24 juli 2013 23:31 schreef snabbi het volgende:

quote:

Op woensdag 24 juli 2013 23:33 schreef qu63 het volgende:

[..]

Ja, dat

quote:

Op woensdag 24 juli 2013 23:34 schreef snabbi het volgende:

[..]

Als er een betere oplossing is, haal ik de mijne weg. Ik zou zeggen dump de steden in aparte kolommen, maar dit is handiger.

quote:

Op woensdag 24 juli 2013 23:50 schreef qu63 het volgende:

[..]

Jammer, eigenlijk. Ook van 'fouten' of minder handige oplossingen valt te leren, imho. Ik zat namelijk op dezelfde weg als jou, maar wilde de reeksen dynamisch maken dmv een als()-constructie. Helaas werkt dat laatste niet..
_{En was het nog niet helemaal duidelijk in mijn hoofd..}

quote:

Op woensdag 24 juli 2013 23:26 schreef ralfie het volgende:

[..]

selecteer gegevens (inclusief titels)
ga naar tabje 'invoegen'. Klik op pijltje bij 'draaitabel' -> 'draaigrafiek'
OK
in het paneel rechts
sleep 'stad' (bovenaan) naar legendavelden (onderin)
sleep 'winst' naar waarden
sleep 'jaar' naar asvelden

Verander eventueel grafiek soort.

quote:

Op vrijdag 26 juli 2013 16:47 schreef Zocalo het volgende:
Een hele simpele vraag waarschijnlijk:

Ik heb drie kolommen,
A = verkoop
B = inkoop
C = saldo van beide

Als ik in een formule bij C echter A-B doe, valt hij soms foutief uit. In sommige stellen staat immers niets (¤ -) en dan neem bij bijvoorbeeld: (0 - -300 = +300). Min en min is plus, maar dat gaat in deze natuurlijk niet op...

Hoe verhelp je dit?

quote:

Op vrijdag 26 juli 2013 16:47 schreef Zocalo het volgende:
Een hele simpele vraag waarschijnlijk:

Ik heb drie kolommen,
A = verkoop
B = inkoop
C = saldo van beide

Als ik in een formule bij C echter A-B doe, valt hij soms foutief uit. In sommige stellen staat immers niets (¤ -) en dan neem bij bijvoorbeeld: (0 - -300 = +300). Min en min is plus, maar dat gaat in deze natuurlijk niet op...

Hoe verhelp je dit?

quote:

Op vrijdag 26 juli 2013 17:06 schreef ralfie het volgende:

[..]

Ik vind het vreemder dat je een inkoop van -300 kunt hebben. Tenzij ik je omschrijving 'saldo van beide' misvat, lijkt +300 me toch een goede uitkomst?

quote:

Op vrijdag 26 juli 2013 16:54 schreef DaFan het volgende:
Doe je
ABS(A) - ABS(B)