Tja cant win them allquote:Op vrijdag 20 juni 2008 21:23 schreef donroyco het volgende:
De TT laat wat te wensen over
D'r zit een fout in idd!quote:Op vrijdag 20 juni 2008 21:23 schreef donroyco het volgende:
De TT laat wat te wensen over
Ik bedoel dus inderdaad de 'Plakken speciaal'-optie en dan alleen waarden en opmaak, maar dan in één keer een heel document, zonder elk werkblad opnieuw te moeten selecteren.quote:Op donderdag 19 juni 2008 21:51 schreef Dixidito het volgende:
Is er een manier om een totaal document met meerdere werkbladen op een simpele manier van al zijn formules te ontdoen en de getallen te vervangen door waarden?
Ik heb namelijk een document dat veel te groot wordt om te mailen, maar dat komt volgens mij door alle regels en formules in het document. Als ik dat op een makkelijke manier kan vervangen door alleen de waarden en opmaak is het document stukken kleiner.
als je er dan een werkbladje bij maakt kun je een nieuwe macro maken, 255 keerquote:Op vrijdag 20 juni 2008 22:41 schreef hooibaal het volgende:
Dat moet met een macro wel te organiseren zijn, toch? Ik ben niet bepaald een ervaren macrobouwer, maar als je een macro maakt die *Blad selecteert - Kopieert - Speciaalplakt - CTRL-Page Down* en dat 255 keer, dan ben je denk ik waar je wezen wil.
TeVensP.
?quote:Op vrijdag 20 juni 2008 22:55 schreef henkway het volgende:
[..]
als je er dan een werkbladje bij maakt kun je een nieuwe macro maken, 255 keer
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | Dim wsName as String For Each ws In Worksheets < Voeg hier de worksheetname toe aan je array > Next ws < Hier loop je door je array heen > For each ..... < geenidee > Sheets.Add Activesheet.Name = wsName & ".new" Sheets(wsName).Select Cells.Copy Sheets(wsName & ".new").Select Range("A1").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Next < volgende in array > |
1 2 3 4 5 | for each ws in Worksheets values=ws.usedrange ws.usedrange=values next ws |
Wat had je nog meer gereport danquote:Op zondag 22 juni 2008 12:41 schreef DaFan het volgende:
Zo'n topicreport helpt ook geen klap, mod heeft alleen } naar ] veranderd.
'Exel' ?quote:
Ah!quote:Op zondag 22 juni 2008 12:51 schreef DaFan het volgende:
Exel -> Excel, excel -> Excel en oude topics in de OP.
ah fuckquote:
Het probleem is dat ik geen XLS kan genereren op de server zonder COM objecten te gebruiken, helaas kan / mag ik geen COM object gebruiken op de server waardoor ik wel op deze manier verder moet gaan. Lezen van een XLS bestand is geen probleem maar het schrijven wel weer daarom dus deze keuze.quote:Op maandag 23 juni 2008 17:18 schreef Cothen het volgende:
De enige manier om in Excel meerdere gegevens onder elkaar in dezelfde tabel te krijgen, is gebruik te maken van het "tekstterugloop" (celeigenschappen). Waarbij de celbreedte net zo breed moet blijven als het breedste gegeven in de cel.
Overigens, waarom gebruik je een formaat dat alleen bedoeld is om te publiceren later weer om te bewerken? Kan je dan niet beter de .xls oom bewaren en die openen om te bewerken?
Importeren he?quote:Op dinsdag 24 juni 2008 09:34 schreef PietjePuk007 het volgende:
[ afbeelding ]
Ik wil dit graag in 1 lange lijst hebben in Acces.
Dus:
Admiral group - 30/12/06 - 455
Admiral group - 2/1/06 - 455
Admiral group - 3/1/06 - 466,75
t/m
Xstrata - 1/1/08 - 673
Oftewel, hoe krijg je een tabelvorm in databasevorm ? De lijst gaat een heul stuk naar beneden en een heul stuk naar rechts dus vandaar dat zo automatisch mogelijk handig is .
1 2 3 4 5 6 7 8 9 10 11 12 | If CheckBox1.Value = True Then Date = Worksheets("Sheet1").Range("H2").Value Worksheets("Sheet1").Range("H2").Value = Date + 152 Date = Worksheets("Sheet1").Range("I2").Value Worksheets("Sheet1").Range("HI").Value = Date + 183 Else If CheckBox1.Value = False Then Exit Sub End If End If End Sub |
1 2 | =AANTAL(data100!G:G;2) |
1 2 3 4 5 6 | x = a + b Range("A" & c).Value = x End Function |
1 2 3 4 5 6 7 8 9 | a = Range("B1").Value b = Range("B2").Value c = Range("B3").Value Som(a, b, c) End Sub |
Als je de variabele "datum" noemt ipv "date" zal het ws. een stuk beter gaan. "Date" is nl. een interne vba functie die de computerdatum opvraagt en schijnbaar ook terug kan schrijven.quote:Op woensdag 25 juni 2008 10:28 schreef BierKoning het volgende:
Ok ik heb een nogal vervelend probleem nu.
Ik ben weer bezig gegaan met VBA en opzich gaat het niet slecht. Op 1 puntje na..
Wanneer ik de volgende code gebruik:
[ code verwijderd ]
Telt hij netjes 152 dagen bij H2 op en 183 dagen bij I2. So far so good.
Alleen telt hij ook 183 dagen bij de computerdatum op Dit is binnen excel een probleem (ik heb de computerdatum nodig) maar het is ook gewoon algemeen onhandig als je computerdatum +10 jaar is (door het testen)
Weet iemand hoe dit komt?
Dat is wel een leuk dingetjes zeg dat je afhankelijke dropdown menus kan maken.quote:Op vrijdag 27 juni 2008 11:17 schreef DaFan het volgende:
Data validation kan je wel gebruiken cross-sheet als je een Named range gebruikt voor je lijst in Sheet2.
(Range selecteren, Invoegen -> Naam -> Definiëren, óf direct in het witte vak linksboven (waar je celnummer staat) een naam intoetsen en op Enter drukken).
In Data Validation kan je dan kiezen voor Lijst -> =<jenaamhier>
Zo kan je ook dubbele dropdowns maken, die dus afhankelijk van de keuze uit dropdown 1 verandert...erg fijn. Zie hier voor een tutorial
Ja ik leerde dit ook pas 2 maanden terug, scheelt een BERG gezeur met VBAquote:Op zaterdag 28 juni 2008 11:59 schreef Deetch het volgende:
[..]
Dat is wel een leuk dingetjes zeg dat je afhankelijke dropdown menus kan maken.
Het klantnummer staat altijd in kolom a, in alle sheets. Het is dus een lange rits met klantnummers onder elkaar.quote:Op zaterdag 28 juni 2008 12:18 schreef DaFan het volgende:
Heb je een vaste cel waar je dat klantnummer invoert of kan dat elke cel zijn? In situatie 1 is het wel te doen, situatie 2 schier onmogelijk (automatisch = als je m intikt en op Enter ramt).
Wat wel kan, is een knop in Werkblad 1 die je gaat gebruiken om nieuwe klanten toe te voegen (met Prompts of via een Form, whatever) want dan kan je simpeler testen op het ingevoerde klantnummer.
Wat niet kan, dat kan niet. Bedankt in ieder geval.quote:Op zaterdag 28 juni 2008 12:34 schreef DaFan het volgende:
Ja daar was ik al bang voor
Kijk:
Als jij een nummer toevoegt, is er voor Excel geen manier om te kijken wáár dit is gebeurt (in welke cel). Dit kan wél als het altijd in dezelfde cel is. Je maakt dan een zogenaamde _change event, die elke keer gedaan wordt bij een wijziging in je sheet. (Kort gezegd, die cel wordt gekopieerd ergens ver weg buiten beeld en dan vergeleken met de oude waarde, is deze anders dan weet je dus dat er geknoeid is). Het is nu dus niet te doen om te bepalen óf er een nummer is toegevoegd en wáár (als je dat weet is het nummer bekend, dus kan je testen of hij al in werkblad 2 voorkomt).
Ik moet dit zelf nog even testen, misschien heb ik wel een manier om dit te omzeilen. Máár het is heir inmiddels half 9 dus ik ga even bier drinken en film kijken Misschien vanavond nog, anders morgen! Sorry
1 |
1 |
1 2 3 | 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 | LastRowB = Sheets("Sheet2").Range("A65536").End(xlUp).Row With Sheets("Sheet1") If .Range("F1").Value <> .Range("G1").Value Then NwKlantnummer = .Range("F1").Value For i = 1 To LastRowB If Sheets("Sheet2").Range("A" & i).Value = NwKlantnummer Then Followup = Sheets("Sheet2").Range("B" & i).Value Datum = Sheets("Sheet2").Range("C" & i).Value MsgBox "Klantnummer al bekend in Sheet2!" & (Chr(13)) & (Chr(13)) & "Datum: " & Datum _ & (Chr(13)) & "Actie: " & Followup, vbOKOnly, "Melding" End If Next i .Range("G1").Value = .Range("F1").Value End If End With End Sub |
Hier heb ik helemaal wel wat aan. Het werkt precies zoals ik dat wil hebben.quote:Op zondag 29 juni 2008 07:01 schreef DaFan het volgende:
Ok Dirkh het is gelukt
Hoop dat je hier wat aan hebt!
1 |
1 2 3 4 | ""&[u]&" uur en "&m&" minuten [u]" uur en "m" minuten &[u]&" uur en "&m&" minuten |
Je bent echt een heldquote:Op dinsdag 1 juli 2008 14:21 schreef DaFan het volgende:
Kan wel, morgen op werk ok? Kan je wel nog even het volgende toelichten:
- Wat kolom A gaan doen op die rij als of B-C-D verandert?
- Kan je geen hulpkolom maken waar de aangepaste datum inkomt? DAt scheelt HEEL veel werk.
- Wat komt er in B1-E1 ?
Gister op het werk een en ander aangepast en het werkt geweldig. Op deze manier voorkom ik dat er twee afspraken of acties elkaar gaan kruisen. Dus nogmaals bedankt.quote:Op zondag 29 juni 2008 14:51 schreef DaFan het volgende:
Als je nog wat aanpassingen moet hebben kan je nog wel even terugkomen, maar eerst zelf proberen En het was eigenlijk simpeler dan ik dacht
Geen probleem natuurlijk, succes ermee.
Ik vond het al knap van je dat je om half 6 's morgens begint aan DirkH's probleemquote:Op dinsdag 1 juli 2008 14:32 schreef DaFan het volgende:
Ik woon niet Nederland, mar Sydney dus ga zo slapen. Over 24 uur heb je je antwoord wel het is niet zo lastig (kan gewoon met formules).
1 |
1 |
1 |
1 |
1 |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | If Target.Column <> iStatusColumn Then Exit Sub LastRowB = Sheets("Sheet2").Range("A65536").End(xlUp).Row NwKlantnummer = Cells(Target.Row, iStatusColumn).Value For i = 1 To LastRowB If Sheets("Sheet2").Range("A" & i).Value = NwKlantnummer Then Followup = Sheets("Sheet2").Range("B" & i).Value Datum = Sheets("Sheet2").Range("C" & i).Value MsgBox "Klantnummer al bekend in Sheet2!" & (Chr(13)) & (Chr(13)) & "Datum: " & Datum & (Chr(13)) & "Actie: " & Followup, vbOKOnly, "Melding" End If Next i End Sub |
Ok het werkt! Je code heb ik in zoverre aangepast dat ik " ; " ipv " , " heb, anders pakte Excel hem niet. Verder B2 C2 enz verandert in B1 C1 enzoquote:Op woensdag 2 juli 2008 01:21 schreef DaFan het volgende:
BierKoning:
A1 is je datum, B1 tot E1 zijn je cellen zoals beschreven, H1 is je hulpkolom en kan verplaatst/hide worden:
Formule voor A1:
[ code verwijderd ]
Nederlands:
[ code verwijderd ]
Data validation C1:
Custom -> Formule:
[ code verwijderd ]
Idem voor D1 en E1 maar dan natuurlijk met C1 en D1.
1 |
zo kan het natuurlijk ookquote:Op woensdag 2 juli 2008 01:14 schreef DaFan het volgende:
Eerst qu63:
Als je uren in A1:A3 staan:
[ code verwijderd ]
Range aanpassen naar je eigen range
Edit:
Nederlands:
[ code verwijderd ]
- Waarom de aparte rijen, nu haal je 1 en 2 door elkaarquote:Op woensdag 2 juli 2008 10:25 schreef BierKoning het volgende:
Verder kan ik C2 (heb inderdaad nu headers, in mn eerste test nog niet) gewoon invullen zonder B2 ingevuld te hebben.
Hierbij is dan dus C1 --> Data Validation --> formula: =B2 <> ""
"" "" "" D1 --> Data Validation --> formula: =C2 <> ""
"" "" "" E1 --> Data Validation --> formula: =D2 <> ""
Dat lijkt mij ook de bedoeling?quote:Op woensdag 2 juli 2008 10:35 schreef BierKoning het volgende:
Het is wel backwards compatible Als ik eerst E2 invul, dan telt ie braaf 400 op, als ik daarna B2/C2/D2 invul doet hij niks meer.
Het is alleen van belang dat de volgorde van B2 naar E2 doorloop. Ligt ook aan de gebruiker, maar een kleine backup is wel handig.
INT rondt af naar het laagste hele getal (2.9 wordt 2). Hiermee weet je hoeveel dagen je hebt (en je dus maal 24 moet doen). Uren worden namelijk in delen van een dag weergegeven (zet je format maar eens op General ipv [h]:mm, dan kan je het zelf zienquote:Op woensdag 2 juli 2008 11:09 schreef qu63 het volgende:
[..]
zo kan het natuurlijk ook
Waarom nou die int(eger) eigenlijk?
Als ik het invul krijg ik alleen de code te zien, niet het antwoord.quote:Op woensdag 2 juli 2008 01:14 schreef DaFan het volgende:
Eerst qu63:
Als je uren in A1:A3 staan:
[ code verwijderd ]
Range aanpassen naar je eigen range
Edit:
Nederlands:
[ code verwijderd ]
1 |
1 |
Bedankt. Dit betekent echter dat er een hulpcel (A1 in dit voorbeeld) gebruikt moet worden, of zie ik dat verkeerd?quote:Op donderdag 3 juli 2008 12:24 schreef DaFan het volgende:
Voor de andere 2 hierboven, ik heb even geen idee, morgen
ManAtWork:
[ code verwijderd ]
Op welke manier kan je onderscheiden of een kenteken nieuw is of oud?
1 2 3 4 5 6 | Dim C As Range For Each C In Selection C.Offset(0, 0) = Format(UCase(C), "&&-&&-&&") Next End Sub |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | Kenteken = Range("D18").Value If Len(Kenteken) <> 6 Then MsgBox "Geen geldig kenteken ingegeven", vbOKOnly, "Fout!" Range("D18").Value = "" Exit Sub End If If IsNumeric(Right(Kenteken, 1)) = True And IsNumeric(Right(Kenteken, 2)) = False Then Kenteken = Format(UCase(Kenteken), "&&-&&&-&") Range("D18").Value = Kenteken Else Kenteken = Format(UCase(Kenteken), "&&-&&-&&") Range("D18").Value = Kenteken End If Range("AL1").Value = Range("D18").Value End If |
Dat zou al moeten gebeuren als ie in je Worksheet_change event staat.quote:Op donderdag 3 juli 2008 16:07 schreef ManAtWork het volgende:
Check! Dit werkt.
Is het ook nog mogelijk dat de macro automatisch wordt uitgevoerd nadat er op ENTER is gedrukt bij het invullen van D18? Of vraag ik nu teveel?
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | Kenteken = Range("D18").Value If IsNumeric(Right(Kenteken, 1)) = True And IsNumeric(Right(Kenteken, 2)) = False Then Kenteken = Format(UCase(Kenteken), "&&-&&&-&") Range("D18").Value = Kenteken Else Kenteken = Format(UCase(Kenteken), "&&-&&-&&") Range("D18").Value = Kenteken End If Range("AL1").Value = Range("D18").Value End Sub |
application.enableEvents op false zetten aan het begin van je subje, dan weer op true aan het eindquote:Op donderdag 3 juli 2008 23:24 schreef DaFan het volgende:
[..]
Dat zou al moeten gebeuren als ie in je Worksheet_change event staat.
Edit: Ik heb me iets te snel er vanaf gemaakt Probleem nu is dat hij wéér het event gaat uitvoeren als Range("D18") gevuld wordt (niet zo verwonderlijk).
Een derde kolom maken met de volgende functie: =IF(B2>0,B2,#N/A) Hierbij uitgaande dat in B2 de absenten staan.quote:Op donderdag 3 juli 2008 17:06 schreef Xith het volgende:
[ afbeelding ]
Hoe krijg ik de grafiek zover dat de parameters met geen informatie (quarter 2,3,4) zich niet laten zien (dus dat de grafieklijn stopt na Quarter 1). De 3 quarters moeten wel bij de brongegevens blijven!
Dit werkt super. Behalve als er een fout kenteken (lees: geen 6 posities) is ingevuld. Na het invullen van een correct nummer wordt dit niet meer omgezet.quote:Op vrijdag 4 juli 2008 08:19 schreef ralfie het volgende:
[..]
application.enableEvents op false zetten aan het begin van je subje, dan weer op true aan het eind
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 | Application.EnableEvents = False If Range("D18").Value <> Range("AL1").Value Then kenteken = Range("D18").Value If Len(kenteken) <> 6 Then MsgBox "Geen geldig kenteken ingegeven", vbOKOnly, "Fout!" Range("D18").Value = "" Exit Sub End If If IsNumeric(Right(kenteken, 1)) = True And IsNumeric(Right(kenteken, 2)) = False Then kenteken = Format(UCase(kenteken), "&&-&&&-&") Range("D18").Value = kenteken Else kenteken = Format(UCase(kenteken), "&&-&&-&&") Range("D18").Value = kenteken End If Range("AL1").Value = Range("D18").Value End If Application.EnableEvents = True End Sub |
Maar de punten die ik wil 'verbergen' uit de grafiek zijn !VERW (verwijzing fout), ook met zo'n folmule:quote:Op vrijdag 4 juli 2008 08:29 schreef Deetch het volgende:
[..]
Een derde kolom maken met de volgende functie: =IF(B2>0,B2,#N/A) Hierbij uitgaande dat in B2 de absenten staan.
Vervolgens de derde kolom gebruiken om de grafiek te maken.
ja dat is logisch, wanneer er een fout is doe je exit sub waardoor de enableEvents=true niet meer wordt uitgevoerd. Dus datzo even daarvoor zetten hequote:Op vrijdag 4 juli 2008 09:18 schreef ManAtWork het volgende:
[..]
Dit werkt super. Behalve als er een fout kenteken (lees: geen 6 posities) is ingevuld. Na het invullen van een correct nummer wordt dit niet meer omgezet.
Dit is wat ik er nu heb staan.
[ code verwijderd ]
(Wordt toch eens tijd om me hier verder in te verdiepen,... )
edit: Laat maar. Heb het al voor elkaar. (Even rustig nadenken levert ook resultaat. )quote:Op vrijdag 4 juli 2008 17:35 schreef ralfie het volgende:
[..]
ja dat is logisch, wanneer er een fout is doe je exit sub waardoor de enableEvents=true niet meer wordt uitgevoerd. Dus datzo even daarvoor zetten he
1 |
1 |
Je kunt op basis van een bepaalde inhoud van een cel elders een uitkomst genereren. Op basis van die inhoud kun je weer verder. Dus als er een "/" in voorkomt geef je een 0, anders een 1. Dan pas, op basis van die 0 of 1, die tussenstap, doorgaan.quote:Op maandag 7 juli 2008 10:48 schreef BierKoning het volgende:
Hoe kan ik data in 1 cell splitsen naar meerdere cellen?
Ik heb bijvoorbeeld de volgende data:
[ code verwijderd ]
Waarvan ik de data binnen de " " (zie hieronder) wil splitsen naar verschillende cellen.
[ code verwijderd ]
Niet elke code is gelijk aan elkaar, dus het kan ook zijn dat de "141" van hierboven, ook soms ".../141" heet. Dus ik kan niet splitsen op basis van aantallen tekens, alleen op het feit dat alle " " in een andere cel wordt geplaatst.
Nee want bijvoorbeeld "T BW" of "ss nb" horen bij elkaar. Verder kan PC ook "H-L045" worden.quote:Op maandag 7 juli 2008 10:51 schreef PietjePuk007 het volgende:
Kan je met "alles vervangen" de "/" niet weghalen en dan alsnog op posities scheiden?
Nee,quote:Op maandag 7 juli 2008 11:11 schreef DaFan het volgende:
BierKoning is die lengte van de string altijd hetzelfde, afgezien van die 141 of /141?
1 2 3 4 5 6 7 8 9 10 | EN 287-1 141/111 T BW 5 S / B t16(3/13) D168 H–L045 ss nb 1 EN 287-1 141 T BW 5 S t6 D51 H–L045 ss nb 1 EN 287-1 141 T BW 5 S t7 D168 H–L045 ss nb 1 EN 287-1 141 T BW 5 S t5.8 D50 H–L045 ss nb 1 EN 287-1 141 T BW 5 S t6.4 D158 H–L045 ss nb 1 EN 287-1 141 T BW 5 S t4 D38 H–L045 ss nb 2 EN 287-1 135 P BW 1.2 S t8 PF ss nb 2 EN 287-1 135/136 T BW 1.1 S / S t12(12/12) D168 PC ss nb 2 EN 287-1 .../135 T BW 1.1 ... / S t16(.../) D168 PC ss nb 2 |
1 2 3 | End Sub |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | LastRowOrder = .Range("C65536").End(xlUp).Row Aantal = .Range("C" & LastRowOrder).Value Itemnr = .Range("A" & LastRowOrder).Value Stuknr = .Range("B" & LastRowOrder).Value End With With Sheets("Magazijn") LastRowMagazijn = .Range("A65536").End(xlUp).Row + 1 For i = LastRowMagazijn To LastRowMagazijn + Aantal .Range("A" & i).Value = Itemnr & "." & Stuknr & "." & Aantal .Range("B" & i).Value = 1 Next i End With |
Nog even terugkomen op jouw vraag, zie:quote:Op vrijdag 4 juli 2008 10:55 schreef Xith het volgende:
[..]
Maar de punten die ik wil 'verbergen' uit de grafiek zijn !VERW (verwijzing fout), ook met zo'n folmule:
=ALS(B27="#VERW!";"#N/A";B27)
Wilt het niet want zijn leest B27 niet als '#VERW!' maar als een formule, geloof ik...
Wat kan ik doen?
Ik hoor het graag!quote:Op maandag 7 juli 2008 13:00 schreef ArjenD11 het volgende:
Super! bedankt man, ik ga het verwerken en hoop dat ze blij met mij zijn...
1 2 3 | For i = LastRowMagazijn To LastRowMagazijn + Aantal |
1 2 3 | For i = LastRowMagazijn +1 To LastRowMagazijn + Aantal |
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 | Dim c As Range Dim ColumnTarget, InteriorColor As Integer Dim Kleur As Long ColumnTarget = Target.Column Kleur = 31 If ColumnTarget = 1 Then For Each c In Range("A:A") If c.Row = 1 Then Naam = c.Value c.EntireRow.Interior.ColorIndex = Kleur End If If c.Value = "" Then Exit Sub If c.Value = Naam Then c.EntireRow.Interior.ColorIndex = Kleur Else If Kleur = 31 Then Kleur = 37 Else Kleur = 31 End If c.EntireRow.Interior.ColorIndex = Kleur Naam = c.Value End If Next End If End Sub |
1 2 3 4 | Range("D" & i).Interior.ColorIndex = i Range("E" & i).Value = i Next i |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | Dim FileName As String Dim Tijd As String Tijd = Replace(Time, ":", ".") FileName = "C:\Ecel\Overzicht (" & Date & " " & Tijd & ").xls" If MsgBox("Wil je het document opslaan als: " & FileName & "?", vbQuestion + vbOKCancel, "Opslaan?") <> vbOK Then Exit Sub End If Activesheet.SaveAs FileName:=FileName End Sub |
1 2 3 4 5 | ActiveWorkbook.SaveAs Filename:= FileName, FileFormat:= _ xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _ , CreateBackup:=False |
Waarom zou je excel willen gebruiken voor een t-toets als je het met spss kan doen? SPSS kan stukken meer (en ik kan ik meer mee )quote:Op dinsdag 15 juli 2008 12:25 schreef PietjePuk007 het volgende:
Bestaat de one-sided-t-test niet in Excel ? Oftewel gewoon 1 rij data en kijken wat de kans is dat de afwijking tov van 0 door toeval komt.
Alle t-toetsen in excel hebben 2 rijen data nodig (in SPSS bestaat ie wel).
Ik had ondertussen het volgende gevonden, wat in ieder geval werkt:quote:Op donderdag 10 juli 2008 15:16 schreef DaFan het volgende:
BierKoning, ik weet het niet. Bij mij werkt het gewoon, hoe ik het ook toevoeg....sorry ;(
Ruben probeer dit eens:
[ code verwijderd ]
Zomaar ergens van een forum geplukt, dus geen credits voor mij (als het uberhaupt al werkt).
1 2 3 4 5 | ActiveWorkbook.SaveAs FileName:=FileName, _ FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False |
Je bedoelt via de ALS functie #N/A in de cel laten schrijven?quote:Op donderdag 24 juli 2008 12:52 schreef DaFan het volgende:
Maak er #N/A van dan slaat Excel ze over.
Wel een voorzetje. Kijk in werkbalk 'Formulieren'.quote:Op zaterdag 26 juli 2008 21:32 schreef hello_moto1992 het volgende:
'Avond,
Ik wil voor een zuiphok een excelsheet maken waarin je gemakkelijk bier en andere (fris)drank kunt aanvinken. Je kunt natuurlijk makkelijk een lijst van de namen maken en daar achter een 1 in een 2 veranderen, en een 2 in een 3 etc, maar ik dacht aan iets waarbij je als je een kruisje wilt zetten je gewoon op een hokje kunt klikken.
Iemand die mij een opzetje kan geven?
Zal zo eens kijken, alvast bedanktquote:Op zaterdag 26 juli 2008 21:35 schreef Yildiz het volgende:
[..]
Wel een voorzetje. Kijk in werkbalk 'Formulieren'.
Optie 'kringveld' is denk ik wat je zoekt..
1 |
Ik heb niet gezegd dat het makkelijk was, als hij het goed doet, zal het er wel strak uitzien, zonder een heel veld aan éénen (wat ruimte inneemt). In een beetje bierhok worden natuurlijk genoeg biertjes gedronken om vrij snel zo'n vel vol te hebben.quote:Op zondag 27 juli 2008 02:37 schreef DaFan het volgende:
Kan je niet gewoon beter een naam maken, met daarachter een heleboel lege cellen die je 12x12 pixels maakt oid waarin je x'jes, of whatever je wil kan invullen.
Dan kan je via (zeg de naam staat in A1, lege vakken in A2:Z4 = 104 hokjes)
[ code verwijderd ]
tellen hoeveel niet-lege vakjes er zijn.
Wat Yildiz aandraagt moet je nog code en dergelijke gaan maken, beetje omslachtig.
Nee zo'n checkbox is kleinquote:Op zondag 27 juli 2008 11:50 schreef Yildiz het volgende:
[..]
Ik heb niet gezegd dat het makkelijk was, als hij het goed doet, zal het er wel strak uitzien, zonder een heel veld aan éénen (wat ruimte inneemt). In een beetje bierhok worden natuurlijk genoeg biertjes gedronken om vrij snel zo'n vel vol te hebben.
Zie:quote:Op dinsdag 5 augustus 2008 12:40 schreef DaFan het volgende:
Voorbeeld zou wel hendig zijn dit verhaal is voor mij volkomen onbegrijpelijk (Maar dat ligt aan mij).
http://www.driveway.com/ is makkelijkerquote:Op dinsdag 5 augustus 2008 13:06 schreef Folkwin het volgende:
[..]
Zie: http://rapidshare.com/fil(...)0_ruwe_data.xls.html
Top! Bedankt! Ik ga het morgen even proberenquote:Op vrijdag 8 augustus 2008 00:12 schreef Deetch het volgende:
count.if functie zou moeten werken. In het nederlands aantal.als
1 2 3 4 | NL: =ALS(A1=A2;"Lijst1";"Lijst2") |
1 |
Gelukt. Cool !quote:Op zaterdag 9 augustus 2008 16:39 schreef DaFan het volgende:
Done!
Het depot neemt niet geleidelijk met hetzelfde bedrag af. Elke dag kan er geld bij- en afgeboekt worden. Dit maakt het idd een stuk lastiger. Als het maandelijks met een gelijk bedrag afneemt is het niet zo moeilijkquote:Op donderdag 7 augustus 2008 00:56 schreef DaFan het volgende:
McLaren_Fan: Als de grootte van het depot maandelijks verandert en de rente maandelijks verandert is het toch niet zo lastig? Dan maak je gewoon een lijst met alle maanden, de grootte van het depot en de jaarlijkse rente deel je door 12.
Als de grootte van het depot telkens afneemt (ik neem aan dat het hier om een hypotheek gaat?) en niet geleidelijk maar bv per dag of per 3 dagen, wordt het wel wat lastiger inderdaad.
Ik begrijp dus goed:quote:Op maandag 11 augustus 2008 20:14 schreef McLaren_Fan het volgende:
[..]
Het depot neemt niet geleidelijk met hetzelfde bedrag af. Elke dag kan er geld bij- en afgeboekt worden. Dit maakt het idd een stuk lastiger. Als het maandelijks met een gelijk bedrag afneemt is het niet zo moeilijk
Klopt helemaal. De rente wordt uitgekeerd wanneer het saldo van het depot (in 1 keer) wordt uitgekeerd. Hiervoor staat geen vaste looptijd. Gedurende de looptijd kunnen er bedragen bij en afgeboekt worden. Als besloten/gekozen wordt om het saldo van het depot uit te keren, wordt tevens de rente uitgekeerd.quote:Op dinsdag 12 augustus 2008 00:55 schreef DaFan het volgende:
[..]
Ik begrijp dus goed:
- dat je elke dag rente/365 % rente krijgt over het depot bedrag
- de rente wordt alleen maandelijks aangepast
- depot kan elke dag groeien / afnemen
Wat wordt er met de maandelijkse rente gedaan? Bij je depot geboekt of krijg je dat apart?
1 |
1 2 3 4 5 6 7 8 | =MAX(B2:B5) E2 =COUNTIF(B2:B5,D2) F2 {=IF(COLUMNS($F$2:F2)<=$E2,INDEX($A$2:$A$5,SMALL(IF($B$2:$B$5=$D$2,ROW($B$2:$B$5)-ROW($B$2)+1),COLUMNS($F$2:F2))),"")} |
Haha dankjequote:Op woensdag 13 augustus 2008 14:06 schreef nicolasvermeersch het volgende:
Hoe ben je zo alwetend geworden? Goed boek? Zelf uitgezocht? Veel Google?
1 2 3 4 5 6 | average: 2.000 1.000 5500.000 etc. monster1 1.910 0.666 5573.928 9933.860 monster2 2.047 1.789 5483.020 9597.173 monster3 1.926 0.640 5440.231 9460.964 |
Het werkt perfect. Maar juist door het uitstekende functioneren merk ik dat er veel meer dingen die ik nu gebruik verbeterd kunnen worden, dus ben eens aan het kijken of ik de code kan begrijpen en misschien ook wel onder de knie kan krijgen. Jammerlijk gaat dat niet één. twee, drie.quote:Op woensdag 2 juli 2008 01:39 schreef DaFan het volgende:
DirkH:
Je kan je macro eventueel nog aanpassen als volgt:
[ code verwijderd ]
Dan heb je ook geen hulpcellen meer nodig én je kan het nieuwe klantnummer overal in kolom A toevoegen, hij kijkt dus niet alleen naar de laatste cel (je kan met de huidige code nog iets verwijderen tussendoor en toevoegen, zonder dat er een foutmelding komt.
Disclaimer: Ik heb je oude code en sheet hier niet bij de hand, dus zou kunnen dat er een foutje in zit! (Of helemaal niet, hou het dan maar bij de oude Maak wel eerst een backup of kopie van je bestand voordat je dit probeert). We willen het niet ingewikkelder maken dan het al is
Thanks... goeie site!quote:Op woensdag 13 augustus 2008 14:36 schreef DaFan het volgende:
<knip>mrexcel.com.
Vooral de laatste 2 maanden (nadat ik me had aangemeld bij MrExcel) ben ik met kilometers vooruit gegaan.
Hoeveel bedragen maken samen de som van 35K/ Je zou het kunnen proberenm moet de oplosser maar ik geef je weinig kans. Ik neem aan dat er geen herkenningsteksten zijn gekoppeld aan de bedragen?quote:Op donderdag 14 augustus 2008 18:24 schreef DR34M3R het volgende:
Blijkbaar komt mijn vraag niet helemaal over
Herkansing dus:
Ik heb een project waar in totaal honderden bedragen op geboekt zijn, voor totaal zeg maar 1 miljoen euro. Er zijn op dit project verschillende items gemaakt, maar ik weet dat er een post is van in totaal 35000 euro, bestaande uit een paar boekingen. Ik weet alleen niet welke...
Als ik nu tig bedragen onder elkaar heb staan, en een paar bedragen uit die reeks moeten 35k maken. Kan ik excel de meest waarschijnlijke reeks laten zoeken? Of meerdere reeksen die zouden kunnen?
Let wel, die 35k is niet al de som van, dat is een gegeven...
Nee... Nou heb ik ze zelf op het oog al teruggevonden, maar voor een volgende keer blijft het wel handig om te weten of zoiets mogelijk is. Ik ben nogal lui aangelegdquote:Op vrijdag 15 augustus 2008 08:12 schreef Deetch het volgende:
[..]
Hoeveel bedragen maken samen de som van 35K/ Je zou het kunnen proberenm moet de oplosser maar ik geef je weinig kans. Ik neem aan dat er geen herkenningsteksten zijn gekoppeld aan de bedragen?
Maar om kort te zijn: Nee dat kan niet. Heel misschien met de Solver maar ik denk ook niet dat die hiervoor geschikt is.quote:Op vrijdag 15 augustus 2008 09:04 schreef DR34M3R het volgende:
[..]
Nee... Nou heb ik ze zelf op het oog al teruggevonden, maar voor een volgende keer blijft het wel handig om te weten of zoiets mogelijk is. Ik ben nogal lui aangelegd
Ik moest uitgaan van een print van 7 jaar geleden, had niks anders dan het gegeven van een totaalbedrag, en dat die opgebouwd moest zijn uit een gedeelte van wat er destijds geboekt was op dat project.
Tnx. Ik was er al bang voorquote:Op vrijdag 15 augustus 2008 09:41 schreef DaFan het volgende:
[..]
Maar om kort te zijn: Nee dat kan niet. Heel misschien met de Solver maar ik denk ook niet dat die hiervoor geschikt is.
Je kan er vast wel een lange macro voor schrijven met veel iteraties maar denk niet dat dat de moeite waard is.
ik geloof niet heeel erg in de 'kan niet' reacties in excel Over het algemeen geld: alles wat je wilt, kan.quote:
Nee.quote:Op vrijdag 15 augustus 2008 15:25 schreef de_priester het volgende:
[..]
ik geloof niet heeel erg in de 'kan niet' reacties in excel Over het algemeen geld: alles wat je wilt, kan.
Nouja, grofweg dan.
Punt is alleen dat het waarschijnlijk inderdaad niet de moeite gaat zijn om een slim algoritme te gaan
schrijven om een juiste reeks van een X aantal bekende entry's te vinden die het dichtst mogelijk tesamen bij een bepaald X bedrag uitkomen.
heb je helemaaaal geen enkele andere herkenningspunten?
Dat heb ik nu ook gedaan . Maar het is niet de eerste keer dat ik een soortgelijk issue heb, en het zal vast ook niet de laatste zijn.quote:Op zaterdag 16 augustus 2008 07:58 schreef Deetch het volgende:
Met zo weinig aanknopingspunten blijft het denk ik sneller om het met de hand te doen. Als je bijvoorbeeld grenzen hebt waarbinnen de bedragen vallen (meer dan x euro etc etc) en hoeveel boekingen te samen dat totaal bedrag moeten vormen wordt het al een stuk makkelijker.
ipv "Fout" een nieuwe als-functie :)quote:Op zaterdag 23 augustus 2008 14:12 schreef RayMania het volgende:
Ik heb een cel (A1) en daar staat een getal in. In A2 wil ik controleren of het getal in A1 in een bepaalde grens valt en dan wil ik een tekst in A2 laten komen. Als A1 bijvoorbeeld tussen 0 en 15 zit, dan moet in A2 "0-15" komen. Daarvoor kun je voor A2 deze formule gebruiken; =ALS(OF(A1<15;A1>0);"0-15";"Fout").
Maar ik wil meerdere grenzen toevoegen, maar ik weet niet hoe. Als A1 tussen 0 en 15 valt, dan staat er dus "0-15" in A2, maar ik wil ook de grenzen 16-30, 31-45, 46-60, 61-75 en 76-90 toevoegen bij de check. Dus als ik bijvoorbeeld 59 typ in A1, dat in A2 "46-60" komt te staan, maar als ik 33 typ, moet er "31-45" komen te staan in A2. Hoe doe ik dat?
1 |
Ah, snap al waaromquote:Op zaterdag 23 augustus 2008 14:50 schreef RayMania het volgende:
Die formule werkt helaas niet.
1 |
Cool ! Dank je wel.quote:Op zaterdag 23 augustus 2008 15:15 schreef qu63 het volgende:
[ code verwijderd ]
Getest en werkend bevonden
geen idee of het bij jou ook dan werkt
Da's niet logisch want 15 zou in de categorie 0-15 moeten vallen.quote:Op zaterdag 23 augustus 2008 17:56 schreef DaFan het volgende:
Om hier even op uit te breiden
Als je nóg meer ranges toe kan passen kan je gebruik gaan maken van VLOOKUP (VERT.ZOEKEN).
Zet in A1 tot A5 achtereenvolgens 0, 15, 30, 45, 60. Zet daarachter in B1 tot B5 0-15, 16-30, 31-45, 46-60, Fout.
In D1 komt je zoekterm (bv 24).
In E1 komt:
=VERT.ZOEKEN(D1;A1:B5;2;1)
Hij zoekt nu een waarde op die DICHTBIJ ligt (naar beneden toe) en vindt hier dus 15 met als resultaat 16-30.
Maar qu63's functie werkt prima zolang je minder dan 8 categoriën hebt.
Ik wist wel dat het korter konquote:Op zaterdag 23 augustus 2008 17:56 schreef DaFan het volgende:
Om hier even op uit te breiden
Als je nóg meer ranges toe kan passen kan je gebruik gaan maken van VLOOKUP (VERT.ZOEKEN).
Zet in A1 tot A5 achtereenvolgens 0, 15, 30, 45, 60. Zet daarachter in B1 tot B5 0-15, 16-30, 31-45, 46-60, Fout.
In D1 komt je zoekterm (bv 24).
In E1 komt:
=VERT.ZOEKEN(D1;A1:B5;2;1)
Hij zoekt nu een waarde op die DICHTBIJ ligt (naar beneden toe) en vindt hier dus 15 met als resultaat 16-30.
Hoezo? Je kan veel meer Als-functies achter elkaar plakken, tochquote:Maar qu63's functie werkt prima zolang je minder dan 8 categoriën hebt.
Waarom werkt deze dan nog welquote:Op zaterdag 23 augustus 2008 19:47 schreef de_priester het volgende:
nee. max 8 nested ifs.
daarbij is de vert.zoeken ptie vele malen netter.
1 |
1 |
Anyway ik heb nog een leuk alternatief (moest toch even proberen hehe), beter dan de IF's én dan VLOOKUP:quote:Up to seven IF functions can be nested as value_if_true and value_if_false arguments to construct more elaborate tests. (See Example 3 for a sample of nested IF functions.) If you want to test more than seven conditions, consider using the LOOKUP, VLOOKUP, or HLOOKUP function. (See Example 4 for a sample of the LOOKUP function.
En toch werkt het bij mij in Excel 2007 Nederlandse versie..quote:Op zondag 24 augustus 2008 02:43 schreef DaFan het volgende:
ManAtWork: Je hebt gelijk, was net thuis van de stad dus niet al te scherp.
qu63: Ik heb geen zin om een formule te schrijven met 20 IF's maar wat gebeurt er als je een van de latere categoriën pakt? Kan me niet voorstellen dat het werkt.
Ik heb Excel 2007 en krijg het niet voor elkaar (foutmelding, more nested fucntions than allowed).
Zoiets zat ik ook te bedenken, en eventueel kan je die 15 nog vervangen door een verwijzing naar een veld waarin je de stapgrootte zetquote:Anyway ik heb nog een leuk alternatief (moest toch even proberen hehe), beter dan de IF's én dan VLOOKUP:
=IF(MOD(A1,15)<>0,FLOOR(A1,15)+1&"-"&CEILING(A1,15),A1-14 & "-" & A1)
of
=ALS(REST(A1;15<>0,AFRONDEN.BENEDEN(A1;15)+1 & "-" & AFRONDEN.BENEDEN(A1;15);A1-14 & "-" & A1)
A1 houdt de waarde.
true, maar ik had nu geen zin om het efficiënter te krijgenquote:Op zondag 24 augustus 2008 10:42 schreef DaFan het volgende:
Ah op die fiets, dan zal het wel iets met 2003- te maken hebben.
Anyway als je ergens 7 IF's of meer voor nodig hebt doe je toch iets verkeerd imo, zeker in termen van effiency en leesbaarheid van je formules
Kan het helaas niet online zetten.quote:Op zondag 24 augustus 2008 16:48 schreef nicolasvermeersch het volgende:
Gegevensvalidatie? Zet anders eens je worksheet online.
Lukt niet.quote:Op zondag 24 augustus 2008 16:54 schreef qu63 het volgende:
C1: =tekst(A1)+tekst(B1)
of is dat te simpel gedacht
=TEKST.SAMENVOEGEN(A1;B1) dan?quote:Op zondag 24 augustus 2008 17:04 schreef RayMania het volgende:
[..]
Kan het helaas niet online zetten.
[..]
Lukt niet.
http://www.driveway.com/quote:Op zondag 24 augustus 2008 17:04 schreef RayMania het volgende:
[..]
Kan het helaas niet online zetten.
[..]
Lukt niet.
8 uur later dan NL.quote:Op zondag 24 augustus 2008 23:48 schreef nicolasvermeersch het volgende:
Hoe laat is het daar nu trouwens DaFan?
... waarbij D2 en D9 op het tabblad 'Invoerblad' een unieke combinatie vormen.quote:Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.SaveAs Filename:="D:\Bestandsnaam_" & Invoerblad.Range("D2").Value & "_" & Invoerblad.Range("D9").Value & ".xls"
End Sub
quote:Op maandag 25 augustus 2008 15:18 schreef DaFan het volgende:
Sheets("Invoerblad"). etc
Invoerblad is nu een lege variable.
DaFan, dank je wel voor in ieder geval de moeite die je hebt genomen om even te kijken.quote:Op donderdag 7 augustus 2008 00:56 schreef DaFan het volgende:
Folkwin ik heb nog even gekeken naar je sheet gister en vandaag maar om een macro te bouwen gaat me iets teveel tijd inzitten. Ik ben van mening dat je met een pivot tabel een heel eind kan komen, maar zoals gezegd heb ik daar 0 ervaring mee. Sorry
Volgens mij kan ik wel helpen; ik verwacht dat ik met functies als =LINKS en =RECHTS wel wat kan knutselen. Maar ik begrijp gewoon niet wat er gebeurt. Waarom zijn die getallen in B3:B11 en D3:D11 zoals ze zijn? Misschien heeft het ermee te maken dat ik niks van voetbal weet?quote:Op woensdag 27 augustus 2008 23:52 schreef borisz het volgende:
Hier mijn sheet
2003 NL versie.
Ik wil wat ik nu ook met het 'kruisje' heb gedaan(ALS toegepast) ook met uitslag doen, alleen uitslag heb ik als bijvoorbeeld 2-1 in één cel. Dan doet excel lastig . Wat is de snelste weg om zo iets te fixen ?
Het gaat om een toto. In het onderdeel kruisje kan men een 1, 2 of 3 voorspellen. Als dat goed voorspelt is dan krijg je een punt. Het zelfde geldt voor uitslag, waarbij je de uitslag goed moet hebben.quote:Op donderdag 28 augustus 2008 07:28 schreef Frollo het volgende:
[..]
Volgens mij kan ik wel helpen; ik verwacht dat ik met functies als =LINKS en =RECHTS wel wat kan knutselen. Maar ik begrijp gewoon niet wat er gebeurt. Waarom zijn die getallen in B3:B11 en D3:D11 zoals ze zijn? Misschien heeft het ermee te maken dat ik niks van voetbal weet?
jep.quote:Op donderdag 28 augustus 2008 09:24 schreef Frollo het volgende:
Aha, wacht, dan is 1 winst thuis, 2 winst uit en 3 gelijkspel?
hmz, gisteravond deed ik dat ook maar toen deed hij het niet ? Of ik zag een fout op het late tijdstip niet meer dat zou ook kunnen .quote:Op donderdag 28 augustus 2008 09:28 schreef Frollo het volgende:
Ik kan de uitslagen gewoon met elkaar vergelijken hoor.
In C14 komt =ALS(C3=E3;1;0), dan omlaagtrekken tot aan C22 en dan krijg ik van boven naar beneden:
1, 0, 0, 0, 0, 1, 0, 1, 1.
Is dat niet de bedoeling?
Je krijgt punten als je het kruisje en/of de uitslag goed hebt. Verder vallen er geen punten te verdienen.quote:Op donderdag 28 augustus 2008 09:43 schreef DaFan het volgende:
Dus je krijgt alleen punten als je de precieze uitslag goed hebt en/of de uitslag goed hebt? Dus niet voor doelpunten thuisteam/uitteam etc. Dan kan je idd gewoon dezelfde formule gebruiken, hoef je ook niet met LINKS en RECHTS aan de gang.
Hij ziet D2-D10 niet als getallen, maar als tekst. Kijk maar naar de uitlijning.quote:Op donderdag 28 augustus 2008 11:31 schreef borisz het volgende:
Bestandje verder uitgewerkt
Ik heb gedaan wat Raymania opgeschreven heeft. Dus het eerste gedeelte hoef ik dan alleen nog maar de doelpunten in te vullen, dan vult de rest zichzelf in.
Het tweede gedeelte zijn dan de voorspellingen die gedaan zijn.
Het derde gedeelte zijn dan de punten per wedstrijd. Alleen ik wilde daar een als functie toepassen. Alleen nu doet hij het niet terwijl hij wel gelijk is.
In cel B27 staat nu =ALS(D2=B15;1;0). Alleen hij wil het niet het punt toekennen terwijl die wel toegekend moet worden. Waar zit de fout ?
Bedankt voor je reactie. Ik zit hier op het werk en heb het bestand voor me. De mogelijkheid die jij aangeeft is grijs en kan ik dus niet kiezen.quote:Op donderdag 28 augustus 2008 14:16 schreef ManAtWork het volgende:
Extra -> Beveiliging -> Werkmap beveiligen
Ben je niet toevallig nog een cel aan het bewerken?quote:Op donderdag 28 augustus 2008 14:25 schreef Devlinsect het volgende:
[..]
Bedankt voor je reactie. Ik zit hier op het werk en heb het bestand voor me. De mogelijkheid die jij aangeeft is grijs en kan ik dus niet kiezen.
Kan het zijn dat de systeembeheerder deze optie heeft uitgeschakeld?
Nee.quote:Op donderdag 28 augustus 2008 14:30 schreef qu63 het volgende:
[..]
Ben je niet toevallig nog een cel aan het bewerken?
Anders lijkt het inderdaad iets wat de systeembeheerder voor je op kan lossen
1 2 3 4 5 6 7 8 9 | ' 'disable protection with password strPW = "testpassword" ActiveSheet.Unprotect Password:=strPW 'enable protection with password ActiveSheet.Protect Password:=strPW, DrawingObjects:=True, Contents:=True, Scenarios:=True End Sub |
Jep, ik kende dat nog niet .quote:Op vrijdag 29 augustus 2008 09:35 schreef DroogDok het volgende:
$D$2 lijk me toch?
met F4 gaat het makkelijker....en je kunt hiermee meerdere "gegevens" vastzetten.quote:
Volgens mij niet. Met grafieken kan het wel maar dat komt omdat die een export functie hebben:quote:Op zaterdag 30 augustus 2008 23:49 schreef RayMania het volgende:
Is het mogelijk om een hele werkblad te kopiëren naar een tekenprogramma als Photoshop? Ik kan het wel met screenshot doen, maar omdat mijn werkblad erg lang is, komt niet alles erop. Dan moet ik dus gaan knippen en plakken en er één figuur van maken, maar dat duurt wat lang. Kan het simpeler?
Adobe Acrobat installeren (dus niet alleen de Reader), dan komt er een virtuele printer in je lijstjequote:Op zondag 31 augustus 2008 12:34 schreef RayMania het volgende:
Hoe print ik naar PDF? .
In welk lijstje precies? Ik heb Adobe Acrobat geïnstalleerd, maar kan weinig vinden.quote:Op zondag 31 augustus 2008 12:36 schreef qu63 het volgende:
[..]
Adobe Acrobat installeren (dus niet alleen de Reader), dan komt er een virtuele printer in je lijstje
Je lijst met printers. CTRL+P en dan printer kiezenquote:Op zondag 31 augustus 2008 12:53 schreef RayMania het volgende:
[..]
In welk lijstje precies? Ik heb Adobe Acrobat geïnstalleerd, maar kan weinig vinden.
Of... een stukje software als 'PDFCreator' downloaden.quote:Op zondag 31 augustus 2008 12:36 schreef qu63 het volgende:
[..]
Adobe Acrobat installeren (dus niet alleen de Reader), dan komt er een virtuele printer in je lijstje
Kan ook inderdaad.. Ik doe het met Acrobat (hele pakket in een keer 'gekocht')quote:Op zondag 31 augustus 2008 13:02 schreef Yildiz het volgende:
[..]
Of... een stukje software als 'PDFCreator' downloaden.
http://sourceforge.net/projects/pdfcreator/ (voor de mensen die geen zin hebben om heel Acrobat te installeren)
Op een zondag nog wel, foeiquote:Op zondag 31 augustus 2008 13:04 schreef qu63 het volgende:
[..]
Kan ook inderdaad.. Ik doe het met Acrobat (hele pakket in een keer 'gekocht')
Ik heb het al veel langerquote:
Ik heb het gevonden:quote:Op donderdag 28 augustus 2008 14:11 schreef Devlinsect het volgende:
Excel 2003 NL talig:
ik zou graag een excelbestand willen beveiligen met een wachtwoord. Hoe doe ik dat?
Heb het niet op de site gevonden die je aanraade, maar heb het wel gevonden, VBA-scriptjequote:Op donderdag 28 augustus 2008 11:00 schreef DaFan het volgende:
Ik ga heel eerlijk zijn:
Ik heb geen idee hoe je door files moet loopen
Ik heb geen idee hoe je pics moet toevoegen via een macro (recorder neemt niks op als ik het probeer)
Dus ik kán het waarschijnlijk wel bouwen maar ik moet alles zelf eerst leren. Spijt me dat je van deze kant zo weinig hulp krijgt, maar ik verwijs je graag door naar http://www.mrexcel.com/forum/forumdisplay.php?f=10 .
Ik weet 100% zeker dat ze je daar kunnen helpen.
Interessant!quote:Op maandag 1 september 2008 10:04 schreef Folkwin het volgende:
[..]
Heb het niet op de site gevonden die je aanraade, maar heb het wel gevonden, VBA-scriptje
misschien kunnen andere mensen er nog wat mee.
Bedankt voor de tip en hulp!
Voorbeeldfile: http://www.contextures.com/ShowFilePicsDemo.zip
Dan heb je alleen het tabblad beveiligd, niet het bestand zoals je vroeg.quote:Op maandag 1 september 2008 09:39 schreef Devlinsect het volgende:
[..]
Ik heb het gevonden:
Extra, opties en dan tabblad beveiliging. Dat was het juiste antwoord.
1 |
Heb je een Nederlandstalige Excel?quote:Op woensdag 3 september 2008 13:08 schreef Cuegirllie het volgende:
Volgens mij werkt die niet echt
Uh jaquote:
Sorryquote:Op woensdag 3 september 2008 13:50 schreef DaFan het volgende:
Daarom staat er ook in de OP dat je erbij moet zetten welke versie je moet hebben.
Het kan nog wel wat ingewikkelder maar ik hoop dat dit genoeg voor je is
Ach ja in 8 postst is het ook geregeldquote:Op woensdag 3 september 2008 13:50 schreef DaFan het volgende:
Daarom staat er ook in de OP dat je erbij moet zetten welke versie je moet hebben.
Het kan nog wel wat ingewikkelder maar ik hoop dat dit genoeg voor je is
Forum Opties | |
---|---|
Forumhop: | |
Hop naar: |