DIG Digital Corner
Alles wat je altijd al over computers, hardware, software, internet en elektronische gadgets had willen weten, maar niet op Tweakers.net durft te vragen.
Ik heb de oplossing gevonden; het stond echter niet op de genoemde site, maar lag wel in het verlengde ervan: ik heb de deling van de werkmap ongedaan gemaakt en weer opnieuw ingesteld.quote:Op dinsdag 30 maart 2010 17:26 schreef DaFan het volgende:
Gitarist sla je m toevallig op als Excel 97 workbook?
Heb je per ongeluk iets in cel IV65536 gezet (of ergens anders in een 'verre' cel)?
Of niet goed gesloten op bepaalde machines; http://www.kbalertz.com/9(...)e-exponentially.aspx
Nu is het bestand 677KB. Dat is wel een heel verschil met de 22MB die het eerst was!
me·lo·maan\ (de ~ (m.), -manen)
1 iem. met een overdreven liefde voor muziek
1 iem. met een overdreven liefde voor muziek
Drugs are bad m'kayquote:Op dinsdag 30 maart 2010 23:04 schreef WSquater het volgende:
Oke, mijn vraag: wat is Windows Excel? Maakt het eten met de miljarden euro's die in dit programma zijn gespendeerd?
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Woensdag en donderdag zijn dus excel dagen bij uitstekquote:
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Wellicht is een verklaring dat iemand aan 't eind van de week een overzicht wil hebben al dan niet in opdracht.quote:Op woensdag 31 maart 2010 11:07 schreef Deetch het volgende:
[..]
Woensdag en donderdag zijn dus excel dagen bij uitstek
Op maandag en dinsdag probeer je 't eerst zelf te maken.
Op woensdag / donderdag neem je je toevlucht tot FOK.
En dan is op vrijdag het overzicht klaar.
Nog wat feitjes:
Er zijn 1175 dagen verstreken sinds het eerste topic
Er zijn 5718 bijdrages geweest.
4,87 bijdrages per dag
Record is 15-12-2008 met 49 stuks.
80% van de bijdrages worden in 28% van de dagen geleverd.
Ja, ja, 't is maar dat je 't weet.
[ Bericht 21% gewijzigd door Twentsche_Ros op 31-03-2010 12:35:18 ]
Je kunt beter één kaars opsteken dan duizend maal de duisternis vervloeken.
simpele macro, toch weet ik niet goed hoe ik het aanpak :
Als ik een bepaalde cel heb ( voor het gemak A1 ) en ik klik op die cel moet er eerst een X komen en als ik er nog een keer op klik een V, en als ik er een derde keer op klik een NVT. Ook zou ik graag willen dat de kleur veranderd. X rood V groen NVT zwart.
Waar moet ik op zoeken?
Als ik een bepaalde cel heb ( voor het gemak A1 ) en ik klik op die cel moet er eerst een X komen en als ik er nog een keer op klik een V, en als ik er een derde keer op klik een NVT. Ook zou ik graag willen dat de kleur veranderd. X rood V groen NVT zwart.
Waar moet ik op zoeken?
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 | Application.EnableEvents = False a = 1 If Not Intersect(Target, Range("A1")) Is Nothing Then If Target.Value = "" Then Target.Value = "X" Else If Target.Value = "X" Then Target.Value = "V" Else If Target.Value = "V" Then Target.Value = "NVT" Else If Target.Value = "NVT" Then Target.Value = "" End If End If End If End If Application.EnableEvents = True |
Je moet wel eerst van cel wisselen anders lukt het niet
De rest met Voorwaardelijke opmaak, zie vorige topic, daar staat een uitleg.
Hmm, op zich werkt hij maar als ik tijdens het selecteren van de cel perongeluk een andere cel selecteer loopt het script vast.. het moet noob proof zijnquote:Op woensdag 31 maart 2010 20:17 schreef DaFan het volgende:
[ code verwijderd ]
Je moet wel eerst van cel wisselen anders lukt het niet
De rest met Voorwaardelijke opmaak, zie vorige topic, daar staat een uitleg.
Mja zo danquote:Op woensdag 31 maart 2010 20:50 schreef Bill_E het volgende:
[..]
Hmm, op zich werkt hij maar als ik tijdens het selecteren van de cel perongeluk een andere cel selecteer loopt het script vast.. het moet noob proof zijn
| 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 | Application.EnableEvents = False If Not Intersect(Target, Range("A1")) Is Nothing Then With Target If .Count = 1 Then If .Value = "" Then .Value = "X" Else If .Value = "X" Then .Value = "V" Else If .Value = "V" Then .Value = "NVT" Else If .Value = "NVT" Then .Value = "" End If End If End If End If End With End If Application.EnableEvents = True End Sub |
[ Bericht 5% gewijzigd door DaFan op 01-04-2010 12:47:20 (Code opgeschoond.) ]
Hey luitjes,
probeer al een paar dagen een VBA code te maken/vinden voor het 'verstoppen' van onbelangrijke regels in mijn excelsheet.
Het gaat om het volgende: ik heb een excelmap met 3 sheets; sheet 1 waar ik aantallen en data van te verzenden stukken invul, sheet 2 met prijzen voor verzending etc, en sheet 3 met de uiteindelijke factuur.
In principe heb ik het 'excel geraamte' klaar, met op sheet 3 een voorgemaakte factuur met alle eventuele opties (snijden/verzenden 24u/48u etc).
Nu zou ik graag achter de VBA coderegel komen om de regels die uiteindelijk 0 terug genereren (bv omdat er niet gesneden hoeft te worden, dus prijs 0 euro) te 'verstoppen', zodat deze niet zichtbaar worden op de geprinte factuur.
Iemand ideeën?
Let me know als je meer info nodig hebt!
Gr.
excel 2003, NL
probeer al een paar dagen een VBA code te maken/vinden voor het 'verstoppen' van onbelangrijke regels in mijn excelsheet.
Het gaat om het volgende: ik heb een excelmap met 3 sheets; sheet 1 waar ik aantallen en data van te verzenden stukken invul, sheet 2 met prijzen voor verzending etc, en sheet 3 met de uiteindelijke factuur.
In principe heb ik het 'excel geraamte' klaar, met op sheet 3 een voorgemaakte factuur met alle eventuele opties (snijden/verzenden 24u/48u etc).
Nu zou ik graag achter de VBA coderegel komen om de regels die uiteindelijk 0 terug genereren (bv omdat er niet gesneden hoeft te worden, dus prijs 0 euro) te 'verstoppen', zodat deze niet zichtbaar worden op de geprinte factuur.
Iemand ideeën?
Let me know als je meer info nodig hebt!
Gr.
excel 2003, NL
in welke kolom staat dan de 0?
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Uitgaande dat de 0 in kolom D staat kun je de volgende code gebruiken om alle regels waarbij in kolom D een nul staat te verberegn
| 1 2 3 4 5 6 7 8 9 10 11 | ' Range("D1").Select For i = 1 To 100 If ActiveCell.Offset(i, 0).Value = 0 Then ActiveCell.Offset(i, 0).Rows("1:1").EntireRow.Select Selection.EntireRow.Hidden = True End If Next i End Sub |
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
ipv if else if else gebruik select casequote:
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | Application.EnableEvents = False If Not Intersect(Target, Range("A1")) Is Nothing And Target.Count = 1 Then Select Case Target.Value Case "" Target.Value = "X" Case "x" Target.Value = "V" Case "v" Target.Value = "NVT" Case "NVT" Target.Value = "" End Select End If Application.EnableEvents = True End Sub |
(heb gewoon laatste excel (.xlsx 
) in het NL)
ik ben bezig met een voetbal poule voor het WK, maar daar wil ik naast de uitslagen automatisch een poule stand maken, zodat men kan zien welke 2 teams doorgaan naar de volgende ronde
de uitslag kolom is G & H
dus team A - team B en uitslag is dan G&H
nu heb ik 3 kolommen gemaakt voor winst / gelijk / verlies
dus ik zoek formules voor G > H of G=H of H>G waardoor er een 1 of een 0 moet verschijnen in de winst / gelijk / verlies kolommen
) in het NL)ik ben bezig met een voetbal poule voor het WK, maar daar wil ik naast de uitslagen automatisch een poule stand maken, zodat men kan zien welke 2 teams doorgaan naar de volgende ronde
de uitslag kolom is G & H
dus team A - team B en uitslag is dan G&H
nu heb ik 3 kolommen gemaakt voor winst / gelijk / verlies
dus ik zoek formules voor G > H of G=H of H>G waardoor er een 1 of een 0 moet verschijnen in de winst / gelijk / verlies kolommen
Ken je de ALS()-formule al?quote:Op vrijdag 2 april 2010 21:11 schreef icebeer het volgende:
(heb gewoon laatste excel (.xlsx
ik ben bezig met een voetbal poule voor het WK, maar daar wil ik naast de uitslagen automatisch een poule stand maken, zodat men kan zien welke 2 teams doorgaan naar de volgende ronde
de uitslag kolom is G & H
dus team A - team B en uitslag is dan G&H
nu heb ik 3 kolommen gemaakt voor winst / gelijk / verlies
dus ik zoek formules voor G > H of G=H of H>G waardoor er een 1 of een 0 moet verschijnen in de winst / gelijk / verlies kolommen
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
[i]What would life be like without rhethorical questions?[/i]
nee ik weet eigenlijk alleen de standaard dingen van excel 
maar als iemand misschien een voorbeeld heeft of een link naar een site met uitleg ga ik wel even puzzelen
maar als iemand misschien een voorbeeld heeft of een link naar een site met uitleg ga ik wel even puzzelen
Ken je google al?quote:
nee ik weet eigenlijk alleen de standaard dingen van excel
maar als iemand misschien een voorbeeld heeft of een link naar een site met uitleg ga ik wel even puzzelen
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
[i]What would life be like without rhethorical questions?[/i]
=als(g>h;1;0) etc.quote:Op vrijdag 2 april 2010 21:11 schreef icebeer het volgende:
(heb gewoon laatste excel (.xlsx
ik ben bezig met een voetbal poule voor het WK, maar daar wil ik naast de uitslagen automatisch een poule stand maken, zodat men kan zien welke 2 teams doorgaan naar de volgende ronde
de uitslag kolom is G & H
dus team A - team B en uitslag is dan G&H
nu heb ik 3 kolommen gemaakt voor winst / gelijk / verlies
dus ik zoek formules voor G > H of G=H of H>G waardoor er een 1 of een 0 moet verschijnen in de winst / gelijk / verlies kolommen
Ik probeer dit ook toe te passen in mijn sheet, maar krijg het niet voor elkaar.quote:Op donderdag 1 april 2010 17:08 schreef Deetch het volgende:
Uitgaande dat de 0 in kolom D staat kun je de volgende code gebruiken om alle regels waarbij in kolom D een nul staat te verberegn
[ code verwijderd ]
Betreffende kolom = F
Voorwaarde = "In zorg"
Consequentie = hide
Lijkt mij dus puur code aanpassen in:
===============================
Sub Fok()
'
Range("F1").Select
For i = 1 To 1000
If ActiveCell.Offset(i, 0).Value = "In zorg" Then
ActiveCell.Offset(i, 0).Rows("1:1").EntireRow.Select
Selection.EntireRow.Hidden = True
End If
Next i
End Sub
================================
Toch? Wat doe ik fout?
akelig lang stukje code om dit te doen:quote:Op zaterdag 3 april 2010 20:28 schreef McGilles het volgende:
[..]
Ik probeer dit ook toe te passen in mijn sheet, maar krijg het niet voor elkaar.
Betreffende kolom = F
Voorwaarde = "In zorg"
Consequentie = hide
Lijkt mij dus puur code aanpassen in:
===============================
Sub Fok()
'
Range("F1").Select
For i = 1 To 1000
If ActiveCell.Offset(i, 0).Value = "In zorg" Then
ActiveCell.Offset(i, 0).Rows("1:1").EntireRow.Select
Selection.EntireRow.Hidden = True
End If
Next i
End Sub
================================
Toch? Wat doe ik fout?
| 1 2 3 | If cell.Value = "In zorg" Then cell.EntireRow.Hidden = True Next cell |
Ik heb een probleempje met het besturingselement "keuzelijst met invoervak". Bij besturingselement opmaken kan ik bij invoerbereik een bereik aangeven waaruit je met het keuzevak kunt kiezen. Ik wil echter maar een bepaald deel van het bereik (wat aan een bepaalde waarde voldoet) in het keuzevak hebben.
Klinkt volgens mij niet heel duidelijk dus zal ik een voorbeeldje geven.
op werkblad 1 heb ik een lijst staan met verschillende producten. kolom 1 de productnaam en kolom 2 het aantal.
Ik wil vervolgens een keuzelijst maken op werkblad 2 van alle producten op werkblad 1 waarvan er meer dan 3 zijn.
Klinkt volgens mij niet heel duidelijk dus zal ik een voorbeeldje geven.
op werkblad 1 heb ik een lijst staan met verschillende producten. kolom 1 de productnaam en kolom 2 het aantal.
Ik wil vervolgens een keuzelijst maken op werkblad 2 van alle producten op werkblad 1 waarvan er meer dan 3 zijn.
