[Excel] Het grote Excelvragentopic #45

quote:

Op zaterdag 7 mei 2016 14:56 schreef Janneke141 het volgende:

[..]

Hmm. Ik gebruik het ook regelmatig. Geen idee dan.

Nou is er natuurlijk wel omheen te werken, maar ik doe het al jaren zo automatisch dat ik in het afgelopen kwartier al tig keer niet door had dat ik een cel leeg heb gelaten (want bijna blind "ctrl d, tab, ctrl d, tab, wat invullen, tab" etc

quote:

Op zaterdag 7 mei 2016 14:57 schreef heywoodu het volgende:

[..]

Nou is er natuurlijk wel omheen te werken, maar ik doe het al jaren zo automatisch dat ik in het afgelopen kwartier al tig keer niet door had dat ik een cel leeg heb gelaten (want bijna blind "ctrl d, tab, ctrl d, tab, wat invullen, tab" etc

Doet CTRL-R het nog wel?

quote:

Op zaterdag 7 mei 2016 14:58 schreef Janneke141 het volgende:

[..]

Doet CTRL-R het nog wel?

Ik moest even opzoeken wat dat was want die gebruik ik nooit, maar die werkt blijkbaar wel ja.

quote:

Op zaterdag 7 mei 2016 15:00 schreef heywoodu het volgende:

[..]

Ik moest even opzoeken wat dat was want die gebruik ik nooit, maar die werkt blijkbaar wel ja.

Misschien heb je in je document, al dan niet per ongeluk, iets toegewezen aan de sneltoets CTRL-D ofzo. Probeer het eens in een leeg document?

quote:

Op zaterdag 7 mei 2016 15:01 schreef Janneke141 het volgende:

[..]

Misschien heb je in je document, al dan niet per ongeluk, iets toegewezen aan de sneltoets CTRL-D ofzo. Probeer het eens in een leeg document?

In een nieuw document werkt het ook niet. Volgens mij al een tijdje niet zelfs, maar in het document waar ik mee bezig ben deed 'ie het nog wel, tot vandaag.

quote:

Op zaterdag 7 mei 2016 15:03 schreef heywoodu het volgende:
[..]
In een nieuw document werkt het ook niet. Volgens mij al een tijdje niet zelfs, maar in het document waar ik mee bezig ben deed 'ie het nog wel, tot vandaag.

en als je excel in safe mode opstart?

quote:

Op zaterdag 7 mei 2016 11:21 schreef The_vice het volgende:

[..]

• hmm, dan wellicht files even open middels een Hex Viewer. Kan je twee keer openen en dan naast elkaar je bestanden kijken.

Ik zie wel verschillen maar zover ik kan beoordelen worden die consequent door het hele bestand aangehouden.

Als ik het excelgegenereerde bestand open, zie ik rechts precies hetzelfde staan als wanneer ik het in Notepad zou openen, en in het linkergedeelte dan de bijbehorende hexadecimale codes.

Het 'FSO'bestand doet min of meer hetzelfde, het verschil is dat na élk karakter een punt ingevoegd, die ook consequent links terug te vinden zijn in de hexadecimale codes.

1 van de kopteksten bv. is x/aantal, het de FSO file laat dan x./.a.a.n.t.a.l. zien.

Enige wat mij opvalt bij dat FSO bestand, is dat regel 1 van de kopteksten begint met 2 tekens die ik niet kan plaatsen. De hd code daarvan is FF FE, en rechts staat dan een y met umlaut en een p met het pootje naar boven doorgetrokken, als je snapt wat ik bedoel.
Weet niet of je daar wat mee kan.

De app zeurt dus over het 1e item van de 1e dataregel, maar daar zie ik geen problemen in...

[ Bericht 2% gewijzigd door Modus op 07-05-2016 18:06:19 ]

quote:

Op zaterdag 7 mei 2016 17:59 schreef Modus het volgende:
1 van de kopteksten bv. is x/aantal, het de FSO file laat dan x./.a.a.n.t.a.l. zien.

Enige wat mij opvalt bij dat FSO bestand, is dat regel 1 van de kopteksten begint met 2 tekens die ik niet kan plaatsen. De hd code daarvan is FF FE, en rechts staat dan een y met umlaut en een p met het pootje naar boven doorgetrokken, als je snapt wat ik bedoel.
Weet niet of je daar wat mee kan.

De app zeurt dus over het 1e item van de 1e dataregel, maar daar zie ik geen problemen in...

Staat voor Big Little Endian. Moest ik ook weer even opzoeken. Heeft met de Encoding te maken.
Heb het om de een of andere reden hier niet als ik vanuit zowel Excel als vanuit VBA de .csv maak.
's kijken of hier wat over te vinden is.
Wat zegt Notepad++ onder encoding over beide files?

Als je googeld op HEX code van de overige . . dan moeten die ook wel weer een betekenis geven.

Maarruh, denk dat we de gok kunnen maken dat "1e item van de 1e dataregel" wellicht op de allereerste regel slaat?

[ Bericht 1% gewijzigd door The_vice op 07-05-2016 19:13:11 ]

Nee. De foutomschrijving is iets als 'de erkencode moet gevuld zijn regel 2'. Erkencode is ook het eerste item.

Kweet niet zeker wat je bedoelt maar NP++ zegt over het Excelbestand 'Encode in UTF8' en over de FSO 'Encode in UCS 2 LE BOM'.

Denk dat ik een ADODB Stream moet gebruiken om een UFT8 file te kunnen schrijven. Even testen daarmee.

quote:

Op zaterdag 7 mei 2016 20:37 schreef Modus het volgende:
Denk dat ik een ADODB Stream moet gebruiken om een UFT8 file te kunnen schrijven. Even testen daarmee.

zoiets las ik ook ergens.
Ondertussen net even in N++ getest, als ik mijn FSO (ANSI) converteer/Encodeer naar Little Endian dan krijg ik netjes de FF FE erbij in HEX viewer. Gaan er ook weer af als ik weer terug converteer naar ANSI.

Blijft wel raar dat FSO export dus anders kan gaan op verschillende machines. (Ik draai hier Win 7 en Excel 64 bit)

even testje gedaan, gewijzigd:
in

en dan output als eerder met
Dan komt ie er als een soort van ANSI uit (N++ geeft geen encoding dan weer). De directe CSV uit Excel komt wel aan als ANSI in N++.

(opties -1 en -2 ipv 0 geeft little endian.)

[ Bericht 18% gewijzigd door The_vice op 07-05-2016 21:08:40 ]

HIJ DOET HET!

Met die ADODB stream schreef hij alsnog als UTF8 BOM weg. Paar regels extra script gevonden dat op basis van eveneens ADODB met een reader/writer die BOM alsnog weghaalt en opnieuw wegschrijft.

En de applicatie accepteert nu het gemaakte bestand.

[ Bericht 91% gewijzigd door Modus op 07-05-2016 21:27:53 ]

quote:

Op zaterdag 7 mei 2016 20:46 schreef The_vice het volgende:

[..]

zoiets las ik ook ergens.

Bedankt voor alle suggesties, tips en stukken code.

quote:

Op zaterdag 7 mei 2016 21:14 schreef Modus het volgende:
HIJ DOET HET!

Met die ADODB stream schreef hij alsnog als UTF8 BOM weg. Paar regels extra script gevonden dat op basis van eveneens ADODB met een reader/writer die BOM alsnog weghaalt en opnieuw wegschrijft.

En de applicatie accepteert nu het gemaakte bestand.

Gefeliciteerd . Heb je in ieder geval weer de volledige controle over je App.
Was dat ook al met de Linefeeds binnen de cellen, of bewaar je dat voor later?

Die zitten er ook al in inderdaad. Ik moet voor de zekerheid nog paar keer testen met andere inputdata en de gebruiker moet het ook nog even bekijken, maar zo op het oog lijkt dit te zijn wat ze zoeken.

Over het Ctrl+D-probleem: de laptop opnieuw opstarten hielp schijnbaar

quote:

Op woensdag 11 mei 2016 15:03 schreef heywoodu het volgende:
Over het Ctrl+D-probleem: de laptop opnieuw opstarten hielp schijnbaar

quote:

Op zaterdag 7 mei 2016 20:46 schreef The_vice het volgende:


Dan komt ie er als een soort van ANSI uit (N++ geeft geen encoding dan weer). De directe CSV uit Excel komt wel aan als ANSI in N++.

(opties -1 en -2 ipv 0 geeft little endian.)

Een csv export in excel is afhankelijk van de land instelling, als er daarin andere decimaal en kolomtekens ingesteld staan komt er een andere export uit, ik weet niet of het daarmee te maken heeft, maar waarschuw toch even daarvoor.

Excel 2013, Engels

Hoe zorg ik ervoor dat onderstaande formule niet tot regel 10.000 wordt doorgetrokken maar tot de laatste cel in de tabel? het aantal regels van de tabel zal variëren van keer tot keer.

Range("I2").Select
ActiveCell.FormulaR1C1 = "=IF(AND(ISBLANK(RC[-5]),RC[-4]=""TA"",NOT(RC[-3]=""PRT Area"")),RC[-3],"""")"
Range("I2").Select
Selection.AutoFill Destination:=Range("I2:I10000"), Type:=xlFillDefault

Edit:
Ik ben er al uit:

quote:

Range("I2").Select
ActiveCell.FormulaR1C1 = "=IF(AND(ISBLANK(RC[-5]),RC[-4]=""TA"",NOT(RC[-3]=""PRT Area"")),RC[-3],"""")"
Range("I2").Select
Range("I2").AutoFill Destination:=Range("I2:I" & Cells(Rows.Count, "A").End(xlUp).Row)

[ Bericht 29% gewijzigd door Puckzzz op 12-05-2016 14:12:52 ]

Vraagje, ik heb een excellijst gemaakt met een planning. Bovenin de lijst heb ik de weeknummers staan.

Op zich best werkbaar deze planning, ik heb echter steeds een kalender nodig om te kijken in welke week een bepaalde datum valt.

Mijn vraag: is er een manier om week + dagen te vermelden, bijvoorbeeld: 20 (16 t/m 20-5)

Alvast bedankt voor het meedenken.

quote:

Op dinsdag 17 mei 2016 11:20 schreef RoofingBurner het volgende:
Vraagje, ik heb een excellijst gemaakt met een planning. Bovenin de lijst heb ik de weeknummers staan.

Op zich best werkbaar deze planning, ik heb echter steeds een kalender nodig om te kijken in welke week een bepaalde datum valt.

Mijn vraag: is er een manier om week + dagen te vermelden, bijvoorbeeld: 20 (16 t/m 20-5)

Alvast bedankt voor het meedenken.

niet zo makkelijk om weeknr->datum te gaan, maar de maandag wordt gegeven door:

A1: weeknr
A2: jaartal (2016)

quote:

Op dinsdag 17 mei 2016 11:41 schreef ralfie het volgende:

[..]

niet zo makkelijk om weeknr->datum te gaan, maar de maandag wordt gegeven door:
[ code verwijderd ]

A1: weeknr
A2: jaartal (2016)

Dit geeft een heel raar getal. 42506 hahaha er gaat iets niet goed.

quote:

Op dinsdag 17 mei 2016 12:16 schreef RoofingBurner het volgende:

[..]

Dit geeft een heel raar getal. 42506 hahaha er gaat iets niet goed.

Rechter muisknop:
Celeigenschappen
Datumnotatie.

Dag FOK!,

Ik heb twee Excel-tabs, één met de prijzen van een rij producten en één van de afzet (aantal verkopen) van dezelfde rij producten. Nu wil ik graag een gemiddelde verkoopprijs voor verschillende productsoorten uitrekenen, maar dan uiteraard een gemiddelde gewogen naar het aantal verkopen. Het zou een appeltje-eitje zijn wanneer de producten in dezelfde volgorde staan in beide tabs, maar dat is helaas niet het geval (alfabetiseren o.i.d. heeft ook geen nut; één tab kent allerlei rijen en andere ongein die de andere tab niet kent). Is er een manier om Excel zo ver te krijgen dat'ie zelf "zoekt" naar de juiste combinaties?

Voor 't geval het bovenstaande verhaal onduidelijk is: ik wil bij de twee onderstaande tabs de gemiddelde verkoopprijs van productgroep A berekenen (door de prijs van A1 te vermenigvuldigen met de afzet van A1, ditzelfde met A2, A3 etc. en dan het geheel te delen door de som van de afzet van A1, A2, etc.). Uiteraard kan dit handmatig door de rijen in beide tabs in dezelfde volgorde te zetten, maar het Excel-bestand in kwestie heeft helaas iets meer dan vijf rijen zoals in het voorbeeld hieronder. Heeft Excel een functie waarmee je dit op een minder arbeidsintensieve manier voor elkaar kan krijgen?

N.B. in onderstaand voorbeeld zou 't uiteraard wel met alfabetiseren van de rijen op te lossen zijn, maar in het werkelijke Excel-bestand kan dit om verschillende redenen niet.

Tab 1
Tab 2

Er vanuitgaande dat alle productsoorten uniek zijn en productsoort en prijs in kolom A en B staan:
in tab 1 een extra kolom toevoegen met:
=B2/INDEX('Tab 2'!B:B,VERGELIJKEN('Tab 1'!A2,'Tab 2'!A:A,0))

Deze formulie deelt B2 door het aantal verkochte producten.
Index werkt als volgt:
Index(rij waaruit resultaat weergegeven moet worden, regelnummer)
Vergelijken zoekt naar een waarde in een kolom en geeft het regelnummer terug en werkt zo:
vergelijken(te vinden waarde, kolom waarin gezocht moet worden, Exact of niet (0 betekent zoek naar de exacte waarde))

Dus in jouw geval:
B2 is de prijs van het verkochte product
Tab 2B:B bevat de verkochte aantallen,
Tab 1A2 is het product
Tab 2 A:A bevat de lijst met producten