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.Bij macro's die een bepaalde, merkbare, tijd nodig hebben om hun werk te doen is het van belang de gebruiker een idee te geven van wat er gebeurt, zeker met macro-optimalisatie aan kan het lijken alsof Excel is vastgelopen. Je kan bijvoorbeeld de statusbar een waarde geven, met eventueel een percentage van de reeds uitgevoerde code.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.Password kwijt?
Soms heb je een worksheeet beveiligd met een password maar ben je die kwijt. Gelukkig is dat geen groot probleem want de interne beveiliging van Excel stelt niet heel veel voor.
Hier vind je meer info en een downloadbare macro die alle interne passwords verwijdert.
DISCLAIMER: Denk erom dat je met het breken van de beveiliging van een excelsheet mogelijk wet- of regelgeving overtreedt. Als de spreadsheet van jezelf is zou het geen probleem moeten zijn.
In andere gevallen: vraag toestemming aan de originele schrijver.
Bij twijfelgevallen: NIET DOEN
Mooi, grappig en cool
Een uitgebreide site met nuttige en minder nuttige excelsheetjes. Van kekke grafieken om je manager of leraar te betoveren via oscillogrammen en simulatoren tot pong voor als het weer een typische vrijdagmiddag is: Excelunusual
Verder
Alle vorige topics zijn hier terug te vinden.
Nieuw topic? Haal de OP uit de wikiSupra 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
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 | Sub ListAllFile() 'makes list of files in selected folder Dim objFso As Object Dim objFolder As Object Dim objFile As Object Dim ws As Worksheet Dim sItem As String Dim fldr As FileDialog Set objFso = CreateObject("Scripting.FileSystemObject") 'Set ws = ActiveCell 'Get the folder object associated with the directory 'select folder dialogue Set fldr = Application.FileDialog(msoFileDialogFolderPicker) With fldr .Title = "Select a Folder" .AllowMultiSelect = False .InitialFileName = strPath If .Show <> -1 Then GoTo NextCode sItem = .SelectedItems(1) End With NextCode: 'MsgBox sItem Set objFolder = objFso.GetFolder(sItem) ActiveCell.Value = "The files found in " & sItem & " are:" 'Loop through the Files collection i = 1 For Each objFile In objFolder.Files ActiveCell.Offset(i, 0).Value = objFile.Name i = i + 1 Next 'Clean up! Set objFolder = Nothing Set objFile = Nothing Set objFso = Nothing End Sub |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 | Option Explicit Sub makeMergeSheets(control As IRibbonControl) Dim ws As Worksheet Dim x As Integer Dim r As Integer On Error Resume Next Application.DisplayAlerts = False Sheets("Merge").Delete Application.DisplayAlerts = True On Error GoTo 0 Set ws = Worksheets.Add(before:=Sheets("Index")) ws.Name = "Merge" r = 5 'beginregel For x = 3 To Worksheets.Count - 2 If Sheets(x).Range("H30").Value > 0 Then With ws .Range("a" & r).Value = Sheets(x).Range("D4").Value .Range("b" & r).Value = Sheets(x).Range("D5").Value .Range("c" & r).Value = Sheets(x).Range("D6").Value .Range("d" & r).Value = UCase(Sheets(x).Range("D7").Value) .Range("e" & r).Value = Sheets(x).Range("i3").Value r = r + 1 End With End If Next Set ws = Nothing End Sub |
Waarschijnlijk zijn het geen getallen maar tekst. En waarom is 1640 zonder punt?quote:Op woensdag 29 oktober 2014 13:55 schreef CklokC het volgende:
Dit zal vast niet de moeilijkste vraag zijn, maar ik kom er maar niet uit.![]()
Ik wil getallen sorteren van groot naar klein. Door het scheidingsteken voor duizendtallen (een punt in dit geval) sorter hij echter niet goed:
[ afbeelding ]
Hij zou de 2.059 na de 1.936 moeten zetten en voor 10.065. Enzovoorts.
Ik wil gewoon dat 2.059 wordt weergegeven als 2059.
Iemand?
Zou goed kunnen. Deze getallen komen uit SAP.quote:Op woensdag 29 oktober 2014 14:18 schreef Deetch het volgende:
[..]
Waarschijnlijk zijn het geen getallen maar tekst. En waarom is 1640 zonder punt?
Kolom selecterenquote:Op woensdag 29 oktober 2014 15:01 schreef CklokC het volgende:
[..]
Zou goed kunnen. Deze getallen komen uit SAP.
1640 is zonder punt omdat ik die handmatig zo had gezet, om te testen of ie dat wel pakte.
Soms is het zo makkelijk.quote:Op woensdag 29 oktober 2014 15:07 schreef Deetch het volgende:
[..]
Kolom selecteren
CTRL+H
. vervangen door niks
replace all
Helaas vaak genoeg geclasht met SAPquote:
quote:Op woensdag 29 oktober 2014 15:07 schreef Deetch het volgende:
[..]
Kolom selecteren
CTRL+H
. vervangen door niks
replace all
Lol, gebeurt mij ook nog wel eens. heb ik een hele macro gemaakt om iets te doen en zegt een collega: Oh zo? klik klik klaarquote:Op woensdag 29 oktober 2014 16:36 schreef KaBuf het volgende:
[..]
Ik zat al moeilijk een oplossing uit te denken met text to columns
Dat deed ik een keer bij een collega die al jaren met formules en filters duplicaten verwijderde, terwijl Data>Remove duplicate hetzelfde doet.quote:Op woensdag 29 oktober 2014 16:42 schreef Deetch het volgende:
[..]
Lol, gebeurt mij ook nog wel eens. heb ik een hele macro gemaakt om iets te doen en zegt een collega: Oh zo? klik klik klaar
Dit is ook meteen een makkelijke manier om datums uit SAP goed te zetten. Vanwege de datum notatie 29.10.2014 sorteert hij dan ook zo irritant. Nu deed ik via tekst naar kolom (o.i.d. weet het even niet exact uit m'n hoofd) de datum overzetten van 29.10.2014 naar 29-10-2014.quote:Op woensdag 29 oktober 2014 16:35 schreef Deetch het volgende:
[..]
Helaas vaak genoeg geclasht met SAP
graag gedaan
Tja SAP is dan ook een duits programma. de afkorting staat voor "Scheiß Arsch Programm" of "Sanduhr Abwarten Programm"quote:Op woensdag 29 oktober 2014 19:50 schreef CklokC het volgende:
[..]
Dit is ook meteen een makkelijke manier om datums uit SAP goed te zetten. Vanwege de datum notatie 29.10.2014 sorteert hij dan ook zo irritant. Nu deed ik via tekst naar kolom (o.i.d. weet het even niet exact uit m'n hoofd) de datum overzetten van 29.10.2014 naar 29-10-2014.
Hahaha, dat verklaart alles. Deze zegt voor mij genoeg:quote:Op donderdag 30 oktober 2014 08:17 schreef Deetch het volgende:
[..]
Tja SAP is dan ook een duits programma. de afkorting staat voor "Scheiß Arsch Programm" of "Sanduhr Abwarten Programm"
OT:
Het kan idd ook via text to columns, dan moet je bij de datum kolom even aangeven dat het een datum notatie is.
Als je nog meer geluk hebt krijg je er ook nog 01.01.2014 uit en excel vind in datum notities de trailing 0 vaak niet zo leuk.quote:Op woensdag 29 oktober 2014 19:50 schreef CklokC het volgende:
[..]
Dit is ook meteen een makkelijke manier om datums uit SAP goed te zetten. Vanwege de datum notatie 29.10.2014 sorteert hij dan ook zo irritant. Nu deed ik via tekst naar kolom (o.i.d. weet het even niet exact uit m'n hoofd) de datum overzetten van 29.10.2014 naar 29-10-2014.
=VERT,ZOEKEN(B2;I2:K8;3;WAAR)quote:Op maandag 3 november 2014 10:28 schreef Legwieh het volgende:
Ik zou graag in de cel waar de vraagtekens een functie hebben welke afhankelijk van het getal wat in de cel erboven staat het juiste percentage weergeeft.
Dus indien er in cel B2 een waarde staat van ¤7000 moet hij bijvoorbeeld weergeven K2
Staat er in cel b2 een waarde van ¤21500 moet hij weergeven K4, enzovoorts. Nu zou dit volgens mij moeten met een Als functie maar ik heb geen flauw idee hoe. En ik zou ook echt niet weten hoe, wie kan mij helpen?
Alvast dank,
[ afbeelding ]
Named ranges moet wel kunnen denk ik.quote:Op maandag 3 november 2014 13:48 schreef d4v1d het volgende:
Hoe selecteer je een aantal opeenvolgende kollomen behalve één?
Heb nu dit: =COUNTIF(B4;B5;B7;B8;B9;B10;B11; ">0") maar dan krijg ik dus dit omdat ik elke kolom apart opgeef.
[ afbeelding ]
Ik wil dus B4, B5 en B7 t/m B11 selecteren.. en B6 niet.
Named ranges werkt ook niet met count if, je andere optie is dan eigenlijk de enige oplossing.quote:Op maandag 3 november 2014 13:49 schreef Janneke141 het volgende:
[..]
Named ranges moet wel kunnen denk ik.
Andere optie: =COUNTIF(B4:B11)-COUNTIF(B6)
Is om mn gewerkte uren bij te houden, ik heb dus onder elkaar maandag, dinsdag, woensdag.. Etc.. En daarachter de werktijdenMaar soms doe ik twee shifts en die schrijf ik dan onder elkaar op twee verschillende regels. (Beide met dezelfde dag/datum).quote:Op maandag 3 november 2014 13:58 schreef Deetch het volgende:
[..]
Named ranges werkt ook niet met count if, je andere optie is dan eigenlijk de enige oplossing.
Beter past de vragensteller zijn dataset aan want het lijkt op een onlogische opbouw.
De truc met INDIRECT wel maar alleen als je hem combineert met de SUM functie:quote:Op maandag 3 november 2014 13:48 schreef d4v1d het volgende:
Hoe selecteer je een aantal opeenvolgende kollomen behalve één?
Heb nu dit: =COUNTIF(B4;B5;B7;B8;B9;B10;B11; ">0") maar dan krijg ik dus dit omdat ik elke kolom apart opgeef.
[ afbeelding ]
Ik wil dus B4, B5 en B7 t/m B11 selecteren.. en B6 niet.
Heb van die min 'n plus gemaakt en het werktquote:Op maandag 3 november 2014 13:49 schreef Janneke141 het volgende:
[..]
Andere optie: =COUNTIF(B4:B11)-COUNTIF(B6)
quote:Op maandag 3 november 2014 14:53 schreef d4v1d het volgende:
[..]
Heb van die min 'n plus gemaakt en het werkt
=COUNTIF(B4:B5;">0")+COUNTIF(B7:B11; ">0")quote:
Die functie met de min had ook gewerkt hoor.quote:Op maandag 3 november 2014 15:00 schreef d4v1d het volgende:
[..]
=COUNTIF(B4:B5;">0")+COUNTIF(B7:B11; ">0")
Oh wacht, jij trekt B6 eraf van B4 t\m B11 zie ik nu. Ik deed B4 en B5, plus B7 t/m B11quote:Op woensdag 5 november 2014 13:42 schreef Deetch het volgende:
[..]
Die functie met de min had ook gewerkt hoor.
=COUNTIF(B4:B11;">0")-COUNTIF(B6; ">0")
1 | =IF(E2>F2;Accepted;IF(F2>E2;Declined;Neutral)) |
De teksten staan niet tussen aanhalingstekens.quote:Op donderdag 6 november 2014 20:30 schreef einschtein het volgende:
[ code verwijderd ]
Hij geeft bij mij een naam error, wat is er fout?
1 | =IF(E2>F2;"Accepted";IF(F2>E2;"Declined";"Neutral")) |
Ik dacht dat het niet tussen aanhalingstekens hoefde, maar thanks!quote:Op donderdag 6 november 2014 20:47 schreef Watertornado het volgende:
[..]
De teksten staan niet tussen aanhalingstekens.
Zo werkt hij wel:
[ code verwijderd ]
Iets dat een tekst is moet altijd in aanhalingstekens, anders denkt excel dat het een functienaam of een named range moet zijn en krijg je dus een error.quote:Op donderdag 6 november 2014 21:02 schreef einschtein het volgende:
[..]
Ik dacht dat het niet tussen aanhalingstekens hoefde, maar thanks!
http://www.mrexcel.com/fo(...)near-trend-line.htmlquote:Op dinsdag 18 november 2014 14:51 schreef DhrSoulslayer het volgende:
Jongens misschien een hele domme vraag.
Ik heb in excel een grafiek gemaakt met daarin een trendlijn die excel zelf gemaakt heeft.
Nu wil ik dat de waardes van de trendlijn in de tabel gezet worden die erbij hoort.
voorbeeld:[ afbeelding ]
Uiteraard snap ik dat dit geschatte/niet gemeten waardes zijn maar voor de volledigheid wil ik ze er wel graag in hebben.
En als je rechtsklikt op je oranje lijn kun je deze ook nog op de secundaire as neerzetten, dan kun je daar de trend ook goed zien. Rechtsklikken, format data series, series options, secondary axisquote:Op dinsdag 18 november 2014 14:51 schreef DhrSoulslayer het volgende:
Jongens misschien een hele domme vraag.
Ik heb in excel een grafiek gemaakt met daarin een trendlijn die excel zelf gemaakt heeft.
Nu wil ik dat de waardes van de trendlijn in de tabel gezet worden die erbij hoort.
voorbeeld:[ afbeelding ]
Uiteraard snap ik dat dit geschatte/niet gemeten waardes zijn maar voor de volledigheid wil ik ze er wel graag in hebben.
Ik zou beide oranje lijnen op de 2e as zetten trouwens.quote:Op dinsdag 18 november 2014 15:26 schreef Deetch het volgende:
[..]
En als je rechtsklikt op je oranje lijn kun je deze ook nog op de secundaire as neerzetten, dan kun je daar de trend ook goed zien. Rechtsklikken, format data series, series options, secondary axis
Trendlijn gaat automagisch mee natuurlijkquote:Op dinsdag 18 november 2014 15:37 schreef qu63 het volgende:
[..]
Ik zou beide oranje lijnen op de 2e as zetten trouwens.
Hmm dat ziet er interresant uit. Echter als ik dit in een cel invul komt er niks bijzonders uit. Wellicht dat het te maken heeft met andere excel versies? Ik gebruik 2013 Pro Plus in het nederlands.quote:Op dinsdag 18 november 2014 15:33 schreef Deetch het volgende:
Trend waarden van een rechte lijn kun je als volgt berekenen:
Ik neem aan dat je jaartallen op regel 1 staan, beginnen met 2010 in kolom B
Voor mensen
=INTERCEPT($B$2:$J$2,$B$1:$J$1)+SLOPE($B$2:$J$2,$B$1:$J$1)*B1
Voor server
=INTERCEPT($B$3:$J$3,$b$1:$J$1)+SLOPE($B$3:$J$3,$B$1:$J$1)*B1
Daarom staat dit ook in de OPquote:Op dinsdag 18 november 2014 15:51 schreef DhrSoulslayer het volgende:
[..]
Hmm dat ziet er interresant uit. Echter als ik dit in een cel invul komt er niks bijzonders uit. Wellicht dat het te maken heeft met andere excel versies? Ik gebruik 2013 Pro Plus in het nederlands.
enquote:Op dinsdag 21 oktober 2014 10:14 schreef Deetch het volgende:
vragen. Om alles zo goed mogelijk te laten verlopen zijn er een aantal regels.
Regels
1. Als je een vraag stelt, zet er dan bij welke versie van Excel je hebt en op welke taal hij ingesteld staat.
2. Zet macrocode tussen [ code ] tags
3. Als het “pseudo-code” is, vermeldt dit dan duidelijk
4. Er bestaan geen domme vragen, wel domme antwoorden. Als jouw antwoord niet gaat bijdragen, geef het antwoord dan niet.
5. Dit topic is geen “code-FEBO” waar je half opgewarmde code uit de muur trekt, het is de bedoeling dat je er zelf iets van leert.
quote:
Je hebt helemaal gelijk. Mijn schuld. Te snel en scheef gelezen.quote:Op dinsdag 18 november 2014 16:01 schreef qu63 het volgende:
[..]
Daarom staat dit ook in de OP:
[..]
en
[..]
intercept() = snijpunt()quote:Op dinsdag 18 november 2014 16:03 schreef DhrSoulslayer het volgende:
[..]
Je hebt helemaal gelijk. Mijn schuld. Te snel en scheef gelezen.
Kan ik alsnog een klein duwtje in de goede richting krijgen?
en komma's vervangen door ;quote:Op dinsdag 18 november 2014 16:09 schreef qu63 het volgende:
[..]
intercept() = snijpunt()
en
Slope() = richting()
Volgens de eerste link in de tweede quote
En komma's of puntkomma's is weer afhankelijk van de lokale settingsquote:Op dinsdag 18 november 2014 16:13 schreef Deetch het volgende:
[..]
en komma's vervangen door ;
Degenen die ooit heeft bedacht dat excel in meerdere talen vertaald moest worden moeten ze een nekschot geven. Het voegt geen enkele functionaliteit toe en zorgt alleen maar voor verwarring.
Ik werk ook nog met een cadcam programma, als je tijdens het gebruik van dat programma je settings van het scheidingstekens veranderd dan loopt dat programma vast en moet je handmatig wat files gaan vervangen. Dus het kan nog erger.quote:Op dinsdag 18 november 2014 16:37 schreef qu63 het volgende:
[..]
En komma's of puntkomma's is weer afhankelijk van de lokale settings
Ik vind het vervelender dat niet elke versie van Excel dezelfde function()'s kent of ze op dezelfde manier gebruikt. Geloof dat Excel 2010 AFRONDEN() anders intepreteert dan Excel 2007 en 2013quote:Op dinsdag 18 november 2014 16:48 schreef Basp1 het volgende:
[..]
Ik werk ook nog met een cadcam programma, als je tijdens het gebruik van dat programma je settings van het scheidingstekens veranderd dan loopt dat programma vast en moet je handmatig wat files gaan vervangen. Dus het kan nog erger.![]()
Maar idd te triest voor woorden al die andere nummer notaties en lijstscheidingstekens en dat sommige software ontwikkelaars vinden dat deze uit de settings van het windows systeem gehaald moeten worden.
Je kunt een knop-met-macro 'Start' maken en die de eerste vrije rij op laten zoeken en op het moment van drukken daar de waarde van =NU() laten plakken.quote:Op dinsdag 18 november 2014 22:13 schreef RnldVer het volgende:
Excel 2013
Hoe kan ik een cel veranderen in een drukknop zodat de tijd van dat moment in de cel komt of de cel er naast. Daarnaast het zelfde en dan daarnaast een kolom met met het verschil tussen die twee tijden.
voorbeeld:
Startknop = 12:00 Stopknop = 13:05 Verschil = 1:05
Hier wil ik dan een aantal rijen van hebben en dan op het eind de (verschil)tijd optellen
Gewoon deze macro in een module gooien. En vervolgens 1 knop aanmaken die de macro start om de tijd te plaatsen. Tijden kun je gewoon van elkaar aftrekken.quote:Op dinsdag 18 november 2014 22:13 schreef RnldVer het volgende:
Excel 2013
Hoe kan ik een cel veranderen in een drukknop zodat de tijd van dat moment in de cel komt of de cel er naast. Daarnaast het zelfde en dan daarnaast een kolom met met het verschil tussen die twee tijden.
voorbeeld:
Startknop = 12:00 Stopknop = 13:05 Verschil = 1:05
Hier wil ik dan een aantal rijen van hebben en dan op het eind de (verschil)tijd optellen
1 2 3 4 5 6 | Sub klok() ActiveCell.Value = Time ActiveCell.NumberFormat = "HH:mm:ss" End Sub |
Daar is excel eigen,ijk niet voor gemaakt.quote:Op donderdag 20 november 2014 15:29 schreef goed_volk het volgende:
He allemaal,
Ik loop te klootzakken met Word en Excel om hetzelfde probleem. Word gaat inmiddels goed, alleen met Excel wil het niet lukken en op internet vind ik geen oplossingen.
Ik wil een digitaal briefpapier invoeren als achtergrond in een bestand. In Word heb ik dat opgelost met een watermerk en een paginavullende achtergrond ingevoerd. In Excel lijkt er zoiets niet te zijn. Lullig, want het juist zo handig met facturen...
Iemand een oplossing voor mij?
-edit- het gaat over excel 2011 voor mac
Ik neem aan dat het op Blad1 wel per land bij elkaar staat?quote:Op zondag 23 november 2014 23:20 schreef qu63 het volgende:
Ik weet dat t kan, kom alleen niet meer op de juiste weg(Excel 2007, NL)
Blad1 is een overzicht met verschillende tabellen, o.a. een aantal landen (B, D, NL, etc).
Op een ander tabblad wil ik een overzicht maken voor Belgie (B).
Hoe kan ik nu de juiste regels van Blad1 overnemen in mijn 2e sheet? Als kolom H een getal groter dan 0 bevat wil ik het opnemen in deze lijst, anders niet. Voor andere landen gelden andere kolommen, maar t pincipe is hetzelfde..
Ik kan me herinneren dat t iets met index() en kleinste() was, maar ik kom er niet meer op
Nee, helaas niet.quote:Op zondag 23 november 2014 23:24 schreef Janneke141 het volgende:
[..]
Ik neem aan dat het op Blad1 wel per land bij elkaar staat?
Thanks! In mijn herinnering was er alleen nog een dynamischere oplossing, zonder hulpkolom. Mocht dat niet zo zijn dan is dit idd de beste oplossingquote:Op zondag 23 november 2014 23:29 schreef Janneke141 het volgende:
Op die fiets.
Zou ik persoonlijk anders doen:
Maak hulpkolommen op Blad1, helemaal links: voor ieder relevant land 1. Voor de kolom Belgie stop je er een formule in =ALS(deze regel hoort bij België;maximum van alles hierboven+1;0)
De rest los je op met VERT.ZOEKEN. Gaat denk ik sneller.
Die is er wel, maar de vraag is maar of die overzichtelijker is dan deze. Je wil met de INDEX-functie de goede regels uit blad 1 halen, waarvoor Excel moet snappen welke regels dat zijn. Die kun je met een slimme VERGELIJKEN-functie prima vinden, maar dan heb je óf een hulpkolom nodig op je Belgiëblad (en ben je dus even ver) of moet je dezelfde functie voor iedere kolom opnieuw berekenen - wat ook niet handig is natuurlijk.quote:Op zondag 23 november 2014 23:38 schreef qu63 het volgende:
[..]
Thanks! In mijn herinnering was er alleen nog een dynamischere oplossing, zonder hulpkolom. Mocht dat niet zo zijn dan is dit idd de beste oplossing
Met dat laatste heb ik geen probleemquote:Op zondag 23 november 2014 23:40 schreef Janneke141 het volgende:
[..]
Die is er wel, maar de vraag is maar of die overzichtelijker is dan deze. Je wil met de INDEX-functie de goede regels uit blad 1 halen, waarvoor Excel moet snappen welke regels dat zijn. Die kun je met een slimme VERGELIJKEN-functie prima vinden, maar dan heb je óf een hulpkolom nodig op je Belgiëblad (en ben je dus even ver) of moet je dezelfde functie voor iedere kolom opnieuw berekenen - wat ook niet handig is natuurlijk.
Probleem opgelost. Misschien handig voor iemand anders die hier tegenaan loopt:quote:Op zondag 23 november 2014 17:38 schreef Sometimes het volgende:
Afgelopen dagen voor het eerst in jaren een virus gehad (coinvault). Dit virus versleuteld allerlei gangbare bestanden, en die versleuteling verdwijnt niet wanneer het virus weg is.
Mijn belangrijkste Excel bestand (,xlsm) heeft nu een probleem. Het origineel stond op mijn bureaublad, dat is uiteraard aangetast.
De dagelijkse backup versie stond op de Synology, die is ook aangetast (vaste netwerkverbinding).
Daarnaast staan er kopieën op externe schijven, die zijn uiteraard niet aangetast. Maar ook niet te openen zoals voorheen.
Excel geeft aan dat het bestand hersteld moet worden, en doet dat door het VBA deel er uit te gooien. De rest van mijn data is nog intact.
Ik heb het gevoel dat ik iets over het hoofd zie. In het vertrouwenscentrum (Office 2010) heb ik al Macro's en VBA voor ontwikkelaars aangevinkt, maar dat is het niet.
Wie weet wat er aan de hand is?
Voorheen kon ik mijn backups altijd openen, dus daarom heb ik het idee dat het in Excel zit.
Stukje tekst uit het XML log waar Office de aanpassing in registreert:
<removedPart>Verwijderd onderdeel: /xl/vbaProject.bin-onderdeel. (Visual Basic for Applications (VBA))</removedPart>
Heb ondertussen gevonden wat ik zocht: http://fiveminutelessons.(...)multiple-values-listquote:Op zondag 23 november 2014 23:40 schreef Janneke141 het volgende:
[..]
Die is er wel, maar de vraag is maar of die overzichtelijker is dan deze. Je wil met de INDEX-functie de goede regels uit blad 1 halen, waarvoor Excel moet snappen welke regels dat zijn. Die kun je met een slimme VERGELIJKEN-functie prima vinden, maar dan heb je óf een hulpkolom nodig op je Belgiëblad (en ben je dus even ver) of moet je dezelfde functie voor iedere kolom opnieuw berekenen - wat ook niet handig is natuurlijk.
Dit werkt heel goed. Nu het volgende. De knop staat in A1 als ik klik wil dat de tijd naar A2 gaat hoe kan ik dat in de macro krijgen? En is dit makkelijk te herhalen B1 knop B2 tijd. C1 knop C2 tijd enz..quote:Op woensdag 19 november 2014 08:13 schreef Deetch het volgende:
[..]
Gewoon deze macro in een module gooien. En vervolgens 1 knop aanmaken die de macro start om de tijd te plaatsen. Tijden kun je gewoon van elkaar aftrekken.
Dus in kolom A zet je je starttijd met de macro, in kolom B je eindtijd met dezelfde macro en in kolom C staat al de formule B1-A1 (nummer zelf aanpassen naar wens)
[ code verwijderd ]
Dit werkt heel goed. Nu het volgende. De knop staat in A1 als ik klik wil dat de tijd naar A2 gaat hoe kan ik dat in de macro krijgen? En is dit makkelijk te herhalen B1 knop B2 tijd. C1 knop C2 tijd enz..quote:Excel 2013
Hoe kan ik een cel veranderen in een drukknop zodat de tijd van dat moment in de cel komt of de cel er naast. Daarnaast het zelfde en dan daarnaast een kolom met met het verschil tussen die twee tijden.
voorbeeld:
Startknop = 12:00 Stopknop = 13:05 Verschil = 1:05
Hier wil ik dan een aantal rijen van hebben en dan op het eind de (verschil)tijd optellen
Gewoon deze macro in een module gooien. En vervolgens 1 knop aanmaken die de macro start om de tijd te plaatsen. Tijden kun je gewoon van elkaar aftrekken.
Dus in kolom A zet je je starttijd met de macro, in kolom B je eindtijd met dezelfde macro en in kolom C staat al de formule B1-A1 (nummer zelf aanpassen naar wens)
Sub klok()
ActiveCell.Value = Time
ActiveCell.NumberFormat = "HH:mm:ss"
End Sub
[..]
Waarom zou je dat willen?quote:Op dinsdag 25 november 2014 23:09 schreef RnldVer het volgende:
[..]
Dit werkt heel goed. Nu het volgende. De knop staat in A1 als ik klik wil dat de tijd naar A2 gaat hoe kan ik dat in de macro krijgen? En is dit makkelijk te herhalen B1 knop B2 tijd. C1 knop C2 tijd enz..
Als je wel per se in elke regel een "knop" wilt kun je het volgende doen:quote:Op dinsdag 25 november 2014 23:09 schreef RnldVer het volgende:
[..]
Dit werkt heel goed. Nu het volgende. De knop staat in A1 als ik klik wil dat de tijd naar A2 gaat hoe kan ik dat in de macro krijgen? En is dit makkelijk te herhalen B1 knop B2 tijd. C1 knop C2 tijd enz..
1 2 3 4 5 6 7 8 9 10 11 | Sub CheckBox1_Click() If ActiveSheet.Shapes("Check Box 1").OLEFormat.Object.Value = 1 Then Range("a2").select Activecell.value = Time ActiveCell.NumberFormat = "HH:mm:ss" Else Range("a2").Value = "" End If End Sub |
Deelvensters blokkerenquote:Op woensdag 26 november 2014 09:37 schreef Deetch het volgende:
[..]
Waarom zou je dat willen?
Je kunt nu gewoon zelf de cel selecteren waar de tijd komt, dat is toch veel handiger?
Door de bovenste rijen van je werkblad middels Freeze Panes (rijen bevriezen??) altijd zichtbaar te houden en daar je knop voor de tijd te plaatsen heb je maar 1 knop nodig.
Titels blokkerenquote:
Afhankelijk van welke van de 3 opties je kiest jaquote:
Dit zal je verder helpen: https://support.office.co(...)nl-NL&rs=nl-NL&ad=NLquote:Op vrijdag 28 november 2014 16:04 schreef fespo het volgende:
ik probeer met de "voorwaardelijke opmaak" 2 cijfers te vergelijken.
als een cijfer hoger is dan het voorgaande, dan moet het cijfer groen kleuren.
blijft het cijfer hetzelfde dan moet het rood kleuren.
het cijfer kan nooit lager worden.
bv. ik vul in
A1=1 (begin)
A2=2 (groen)
A3=3 (groen)
A4=3 (rood)
A5=4 (groen)
A6=5 (groen)
A7=5 (rood)
A8=5 (rood)
heeft iemand een idee hoe ik dit kan doen?
=A2-1/24quote:Op maandag 1 december 2014 10:00 schreef Frixel het volgende:
Hoi.
Als ik in A2 dit heb staan 02-12-2014 11:00
en er moet in A1 komen 02-12-2014 10:00
Welke formule moet ik dan gebruiken?
Er staat wel wat leuks tussen.quote:Op vrijdag 5 december 2014 01:48 schreef qu63 het volgende:
Voor de mensen die zelf dashboards maken (of inspiratie zoeken), neem eens een kijkje op excelforum.com. Daar hadden ze een competitie voor de beste dashboards, met deze 3 als winnaars: http://excelforum.com/winner/winner.html
De complete lijst is hier te vinden: http://www.exceltip.com/excel-dashboards
Inclusief downloadlink en uitleg!
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | sub fok dim ws as worksheet dim mysheet as string dim i as integer mysheet = "overzicht" i = 1 for each ws in activeworkbook.sheets if not ws.Name = mysheet then activeworkbook.sheets(mysheet).cells("A", i) = ws.name activeworkbook.sheets(mysheet).cells("B", i) = ws.cells("A", 1) i = i+1 end if next ws end sub |
quote:Op maandag 8 december 2014 20:15 schreef sylvesterrr het volgende:
even snel uit m'n hoofd:
[ code verwijderd ]
Je hebt een sheet "overzicht" nodig. In kolom A komt de naam van de verschillende sheets te staan, en in kolom B de bijbehorende waarde (A1).
Geprint en doorgemaild naar ons hele bedrijf!quote:Op dinsdag 9 december 2014 14:05 schreef Twentsche_Ros het volgende:
Ik heb net de overbodige vertragingen via tekenfilmpjes/animaties van excel 2013 ongedaan gemaakt.
http://www.worksheet.nl/forumexcel/showthread.php?t=85215
Wat is eigenlijk het nut, die vertraging.
Wie zit daar op te wachten?
Volgens mij werkt er bij Microsoft iemand die liever animaties had gemaakt, maar nu saaie Office-pakketten moet maken. Hij wou toch een beetje zijn ei kwijt. Hoe dan ook: Laat deze man/vrouw onmiddelijk ontslag nemen. Voor je het weet zie je bij iedere wijziging van een cel eenquote:Op dinsdag 9 december 2014 16:52 schreef Deetch het volgende:
[..]
Geprint en doorgemaild naar ons hele bedrijf!
quote:Op dinsdag 9 december 2014 16:52 schreef Deetch het volgende:
[..]
Geprint en doorgemaild naar ons hele bedrijf!
quote:Op dinsdag 9 december 2014 17:18 schreef Twentsche_Ros het volgende:
[..]
Volgens mij werkt er bij Microsoft iemand die liever animaties had gemaakt, maar nu saaie Office-pakketten moet maken. Hij wou toch een beetje zijn ei kwijt. Hoe dan ook: Laat deze man/vrouw onmiddelijk ontslag nemen. Voor je het weet zie je bij iedere wijziging van een cel een
"Tom en Jerry"-act.
Oh ja diequote:
Zoiets?quote:Op woensdag 10 december 2014 08:53 schreef Deetch het volgende:
[..]
Oh ja die![]()
en dan ook nog collega's die het leuk vinden om andere "clippies" te installeren
stervende hoere &*%$@#$#(*& nou heb ik weer nachten nachtmerries.quote:
Dan zal ik clippy.js maar niet aan je voorstellen.. https://www.smore.com/clippy-jsquote:Op woensdag 10 december 2014 09:15 schreef Deetch het volgende:
[..]
stervende hoere &*%$@#$#(*& nou heb ik weer nachten nachtmerries.
quote:Op woensdag 10 december 2014 09:40 schreef qu63 het volgende:
[..]
Dan zal ik clippy.js maar niet aan je voorstellen.. https://www.smore.com/clippy-js
Sumproduct!quote:Op donderdag 11 december 2014 14:54 schreef RustCohle het volgende:
Weet iemand hoe ik hier de AverageIF(S) functie kan gebruiken? Ik loop vast met het feit dat er twee mogelijkheden zijn: Dove en >=10 articles of dat er gekozen kan worden voor Palmolive en >= 5 articles
''Determine the average profit on articles from the "Dove" brand coming from cases that contained at least 10 articles, and the "Palmolive" articles coming from cases that contained at least 5 articles''
De shit, je weetz.quote:
Sumproduct is een heeeele ouwe functie in excel die eigenlijk niet meer wrdt "ondersteund" maar er nog wel in zit omdat ie zotof is.quote:
Wat Deetch zegtquote:
Forum Opties | |
---|---|
Forumhop: | |
Hop naar: |