abonnement Unibet Coolblue Bitvavo
  dinsdag 21 april 2009 @ 12:26:26 #184
158136 Joooo-pi
Do you want a balloon...
pi_68233875
quote:
Op maandag 20 april 2009 22:35 schreef Bill_E het volgende:
Weet er iemand hoe ik een foto die op een website staat ( www.foto.nl/foto.jpg) met een simpele muisklik in excel in een cel kan zetten ( de foto dus niet de link) ? En eventueel ook nog een juiste vooraf ingestelde afmeting kan geven? Ik dacht dit ooit online gezien te hebben in een leuke tips en truck website maar krijg het niet meer gevonden
Het is iig wel mogelijk om via "invoegen" --> "afbeelding" ---> "uit bestand" een url in te geven. Dat figuur kun je dan opmaken...
heitieh
pi_68235077
Macrootje opnemen dus en kijken of je dat soort dingen via macro uberhaupt kan doen.
  dinsdag 21 april 2009 @ 18:26:13 #186
25865 Bill_E
vijf plus 98!
pi_68245521
quote:
Op dinsdag 21 april 2009 13:10 schreef DaFan het volgende:
Macrootje opnemen dus en kijken of je dat soort dingen via macro uberhaupt kan doen.
Met een macro opnemen lijkt me niet te lukken. Ik zal er 1 moeten schrijven. Ik heb er wel 1 maar die opent een foto vanaf je harddisk. Maar ik krijg het niet voor elkaar om niet voor elkaar om naar een webadres te linken.
  dinsdag 21 april 2009 @ 18:44:10 #187
158136 Joooo-pi
Do you want a balloon...
pi_68246150
quote:
Op dinsdag 21 april 2009 18:26 schreef Bill_E het volgende:

[..]

Met een macro opnemen lijkt me niet te lukken. Ik zal er 1 moeten schrijven. Ik heb er wel 1 maar die opent een foto vanaf je harddisk. Maar ik krijg het niet voor elkaar om niet voor elkaar om naar een webadres te linken.
Heb je de actie in mijn post "opgenomen" ?
heitieh
  dinsdag 21 april 2009 @ 19:22:20 #188
25865 Bill_E
vijf plus 98!
pi_68247599
quote:
Op dinsdag 21 april 2009 18:44 schreef Joooo-pi het volgende:

[..]

Heb je de actie in mijn post "opgenomen" ?
Helemaal overheengelezen ! zo eens proberen. ff van pc wisselen
  dinsdag 21 april 2009 @ 19:40:42 #189
158136 Joooo-pi
Do you want a balloon...
pi_68248387
quote:
Op dinsdag 21 april 2009 19:22 schreef Bill_E het volgende:

[..]

Helemaal overheengelezen ! zo eens proberen. ff van pc wisselen
ik krijg dit:
1
2
3
4
5
6
7
8
9
10
11
Sub Macro1()
'
' Macro1 Macro
' De macro is opgenomen op 21-4-2009 door Joooo-pi.
'

'
    ActiveSheet.Pictures.Insert("http://www.google.nl/intl/nl_nl/images/logo.gif"). Select
    Selection.ShapeRange.ScaleWidth 1.6, msoFalse, msoScaleFromTopLeft
    Selection.ShapeRange.ScaleHeight 1.6, msoFalse, msoScaleFromTopLeft
End Sub
heitieh
  dinsdag 21 april 2009 @ 21:24:31 #190
25865 Bill_E
vijf plus 98!
pi_68252140
quote:
Op dinsdag 21 april 2009 19:40 schreef Joooo-pi het volgende:

[..]

ik krijg dit:
[ code verwijderd ]


Hulde! Dank u wel. Dit wekt perfect.
pi_68257747
Ik heb een cijfersheet gemaakt, met al mijn gemiddeldes voor school, en nou wil ik dat ergens in een cel komt te staan als er 3 of meer onvoldoendes staan als eindcijfer, dus dat het lager is dan 6. Wat voor formule moet ik invoeren?
pi_68260149
"als er 3 of meer onvoldoendes staan als eindcijfer, dus dat het lager is dan 6"

Wat?
Hij moet pas een gemiddelde berekenen als er meer dan 3 onvoldoendes staan, of..?
Kan je 2 voorbeelden geven:
- Je hebt 5 cijfers waarvan er maar 1 een onvoldoende is, wat is dan de uitkomst?
- Je hebt 5 cijfers waarvan er 3 een onvoldoende zijn, wat is dan de uitkomst?

En welke versie van Excel heb je?
pi_68261416
Aanemende dat je eindgemiddelden in de cellen B1 tm B10 staan

=als(aantal.als(B1:B10;"<6")>=3;"FAIL (" & aantal.als(B1:B10;"<6") & ") ;"No FAIL (yet) (" & aantal.als(B1:B10;"<6") & ")")
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
  woensdag 22 april 2009 @ 09:16:32 #194
84430 kanovinnie
Wie dit leest is gek!
pi_68261548
quote:
Op woensdag 22 april 2009 07:33 schreef DaFan het volgende:
"als er 3 of meer onvoldoendes staan als eindcijfer, dus dat het lager is dan 6"

Wat?
Hij moet pas een gemiddelde berekenen als er meer dan 3 onvoldoendes staan, of..?
Kan je 2 voorbeelden geven:
- Je hebt 5 cijfers waarvan er maar 1 een onvoldoende is, wat is dan de uitkomst?
- Je hebt 5 cijfers waarvan er 3 een onvoldoende zijn, wat is dan de uitkomst?

En welke versie van Excel heb je?
Hij bedoelt dat hij overgaat met 2 onvoldoendes. Zodra er 3 zijn moeten de alarmbellen gaan rinkelen.
Op dinsdag 25 augustus 2015 15:48 schreef Toekito het volgende:
de grootste schande van heel FOK! naast Fylax is Kano als mod.
pi_68261563
Wellicht dat jullie me kunnen helpen:

Ik heb in Excel een dump geplaatst uit het financieel programma. Deze rekent automatisch een KPI uit en die wil ik dan weer in een aparte lijst laten plaatsen. Hiertoe zet ik het weeknummer erachter, wat via een IF-functie dan doorwerkt naar een cel in die aparte lijst.

Tot zover gaat het goed. Maar nu wil ik graag deze uitkomst vastzetten (zonder paste special, automatisch dus), aangezien de gegevens bewaard moeten blijven en de volgende week de rij eronder gevuld moet worden.

Iemand een idee? Volgens mij kan het met macro's, maar daarin kom ik echt net kijken..
pi_68262242
Deetch waarom zo lastig:
=IF(COUNTIF(B1:B10,"<6")>=3,"Niet over",AVERAGE(B1:B10))
pi_68269424
Ik wil het volgende resultaat voor elkaar zien te krijgen:

1
2
3
4
5
6
7
8
9
10
11
12
Type  Subtype 1  Subtype 2
A     0          1
B     1          0
C     1          0  
A     0          1
A     1          0
B     1          1

Resultaat:
A     1          2
B     2          1
C     1          0


Ik heb verschillende typen in de eerste kolom staan (A, B en C), die een verschillend subtype kunnen hebben (ook meer dan één subtype). Als resultaat wil ik dan onderaan de totalen hebben van dingen die Type A én Subtype 1, Type B én Subtype 1, Type C én Subtype 1, Type A én Subtype 2, Type B én Subtype 2 en Type C en Subtype 2 zijn.

Het gebruik van COUNTIF gaat niet, omdat je daar bij de criteria niet kunt opgeven dat er naar een andere kolom gekeken moet worden (range is dan Subtype 1, maar de criteria kun je niet toepassen op Type).

Zo kwam ik bij de DCOUNT uit, die dat wel kan. Heb ik het volgende gemaakt (alleen even voor Type A):

1
2
Type  Subtype 1  Subtype 2
A     =1          =1


Maar dat gaat nu alleen goed als je bij DCOUNT bij de criteria A1:B2 opgeeft (type en subtype 1). Ik heb nog op geen enkele manier iets kunnen maken als: type en subtype 2, maar zonder subtype 1. De DCOUNT wil als criteria een range hebben, maar ik wil juist geen range.

Is er een andere mogelijkheid om zoiets eenvoudig voor elkaar te krijgen?
pi_68271202
=SUMPRODUCT(--($A$2:$A$7=$A10)*(B$2:B$7))

En dan doortrekken naar rechts en beneden.
pi_68280776
quote:
Op woensdag 22 april 2009 09:17 schreef addie het volgende:
Wellicht dat jullie me kunnen helpen:

Ik heb in Excel een dump geplaatst uit het financieel programma. Deze rekent automatisch een KPI uit en die wil ik dan weer in een aparte lijst laten plaatsen. Hiertoe zet ik het weeknummer erachter, wat via een IF-functie dan doorwerkt naar een cel in die aparte lijst.

Tot zover gaat het goed. Maar nu wil ik graag deze uitkomst vastzetten (zonder paste special, automatisch dus), aangezien de gegevens bewaard moeten blijven en de volgende week de rij eronder gevuld moet worden.

Iemand een idee? Volgens mij kan het met macro's, maar daarin kom ik echt net kijken..
Welke versie, welke cellen/kolommen enzo?

Met dit soort vragen zie ik toch wel eerst graag een screenshotje ofzo
pi_68290122
quote:
Op woensdag 22 april 2009 09:46 schreef DaFan het volgende:
Deetch waarom zo lastig:
=IF(COUNTIF(B1:B10,"<6")>=3,"Niet over",AVERAGE(B1:B10))
even een reminder van hoeveel onvoldoendes je hebt zeg maar. Met 2 zou je je zorgen kunnen gaan maken.
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
pi_68293254
quote:
Op donderdag 23 april 2009 00:06 schreef Deetch het volgende:

[..]

even een reminder van hoeveel onvoldoendes je hebt zeg maar. Met 2 zou je je zorgen kunnen gaan maken.
Fair enough
pi_68300277
Hoe kan ik in excel 2000 met ctrl h een 7 vervangen in een 8 zonder dag 17 18 wordt.
pi_68300633
quote:
Op donderdag 23 april 2009 12:29 schreef Stansfield het volgende:
Hoe kan ik in excel 2000 met ctrl h een 7 vervangen in een 8 zonder dag 17 18 wordt.
Bij het venster van zoek/vervang zit een button "opties". Als je daar 'indentieke celinhoud' aanvinkt, zal hij echt alleen op zoek gaan naar 7 in een cel. 17 wordt dan niet veranderd.
Niets is veilig voor een idioot met voldoende talent
pi_68301279
quote:
Op donderdag 23 april 2009 12:42 schreef Metsel het volgende:

[..]

Bij het venster van zoek/vervang zit een button "opties". Als je daar 'indentieke celinhoud' aanvinkt, zal hij echt alleen op zoek gaan naar 7 in een cel. 17 wordt dan niet veranderd.
En als het in een formule staat?

=+'Week 17'!$R$7

R7 moet dus R8 worden en 17 moet 17 blijven.
pi_68301396
quote:
Op woensdag 22 april 2009 09:10 schreef Deetch het volgende:
Aanemende dat je eindgemiddelden in de cellen B1 tm B10 staan

=als(aantal.als(B1:B10;"<6")>=3;"FAIL (" & aantal.als(B1:B10;"<6") & ") ;"No FAIL (yet) (" & aantal.als(B1:B10;"<6") & ")")
Die werkt niet:S
  donderdag 23 april 2009 @ 13:31:18 #206
158136 Joooo-pi
Do you want a balloon...
pi_68302148
quote:
Op donderdag 23 april 2009 13:04 schreef Stansfield het volgende:

[..]

En als het in een formule staat?

=+'Week 17'!$R$7

R7 moet dus R8 worden en 17 moet 17 blijven.
Misschien lukt het met "slim" denken. In dit geval zou $7 vervangen moeten worden voor $8, of misschien kan "7 " vervangen door "8 ". Dat laatste heb ik niet uitgeprobeerd
heitieh
pi_68302335
Tnx. Ja soms denk ik iets te moeilijk terwijl het gewoon simpel kan $7 vervangen door $8 werkt top.

Tnx.
  donderdag 23 april 2009 @ 14:08:14 #208
158136 Joooo-pi
Do you want a balloon...
pi_68303287
quote:
Op donderdag 23 april 2009 13:08 schreef Yannick3211 het volgende:

[..]

Die werkt niet:S
Er mist een ":

als(aantal.als(B1:B10;"<6")>=3;"FAIL (" & aantal.als(B1:B10;"<6") & ")" ;"No FAIL (yet) (" & aantal.als(B1:B10;"<6") & ")")
heitieh
  donderdag 23 april 2009 @ 14:08:39 #209
158136 Joooo-pi
Do you want a balloon...
pi_68303303
-edit-
heitieh
pi_68306400
Bedankt man!:P Nu kan ik het duidelijk maken op school dat een fout van een technisch onderwijsassistent kei veel uitmaakt. Ze had een keer iets gezegd tijdens een practicumtoets voor scheikunde, dus dan neem je aan dat ze gelijk heeft (ik mocht een pipet uitblazen van haar) maar naderand bleek dat dat niet mocht, en daardoor had ik een 6 in plaats van een 8, en daardoor sta ik nou op zakken. als ik wel een acht zou hebben, staat er nou in mijn cijferlijst dat ik wel geslaagd zou zijnXD
pi_68306498
Dan heb ik nog een vraag, ik wil mijn werktijden bijhouden, kan je op een of andere manier slepen zodat ik voor elke 4 weken een apart blad heb? Ik weet dat het kan binnen een blad, maar kan het dus ook met meerdere bladen, zodat ik het niet altijd helemaal uit hoef te typen?
  donderdag 23 april 2009 @ 15:50:49 #212
158136 Joooo-pi
Do you want a balloon...
pi_68306849
quote:
Op donderdag 23 april 2009 15:41 schreef Yannick3211 het volgende:
Dan heb ik nog een vraag, ik wil mijn werktijden bijhouden, kan je op een of andere manier slepen zodat ik voor elke 4 weken een apart blad heb? Ik weet dat het kan binnen een blad, maar kan het dus ook met meerdere bladen, zodat ik het niet altijd helemaal uit hoef te typen?


Slepen is verkapt knippen en plakken

Probeer dat dus eens.
heitieh
pi_68307365
Ok, maar ik moet op elk blad andere data, en hij past zich ook met plakken gewoon aan aan het eigen blad, dus als ik op blad 1 bovenaan 3 april heb staan(in excel codes), en ik kopieer dat, komt op blad 2 natuurlijk ook 3 april te staan. Kan het niet dat je heel snel iets kan doen dat er op elke pagina dus een andere maand (in mijn geval 4 weken) staat?
pi_68307518
Nog een vraag.

Ik wil in excel nl 2000 een grafiek maken met 2 verschillende lijnen van 2 verschillende waarden.

De ene waarde is hoofdzakelijk in de tientallen procenten. De andere waarde schommelt tussen de 1,3 en 3,5.

Wanneer die 2 rijen selecteer krijg ik dus een grafiek die ze allebei als percentage berekend. Hoe voorkom ik dat. Dus dat de grafiek ze als absulote waarden ziet.
  donderdag 23 april 2009 @ 16:14:11 #215
62215 qu63
..de tijd drinkt..
pi_68307647
quote:
Op donderdag 23 april 2009 16:05 schreef Yannick3211 het volgende:
Ok, maar ik moet op elk blad andere data, en hij past zich ook met plakken gewoon aan aan het eigen blad, dus als ik op blad 1 bovenaan 3 april heb staan(in excel codes), en ik kopieer dat, komt op blad 2 natuurlijk ook 3 april te staan. Kan het niet dat je heel snel iets kan doen dat er op elke pagina dus een andere maand (in mijn geval 4 weken) staat?
Excel weet niet uit zichzelf of ie het 4 weken, een kwartaal of misschien wel een jaar op moet schuiven..

Wat je wel kan doen is alleen de eerste datum invullen, en bij de rest steeds vorige+1 doen:
A1 = 23-4-2009
A2 = A1+1 (24-4-2009)
A3 = A2+1 (25-4-2009)
etc.

Als je het nog moeilijker wil maken kan je ook nog de weekenden overslaan (of alleen de zondag, etc.)
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_68309195
quote:
Op donderdag 23 april 2009 15:39 schreef Yannick3211 het volgende:
Bedankt man!:P Nu kan ik het duidelijk maken op school dat een fout van een technisch onderwijsassistent kei veel uitmaakt. Ze had een keer iets gezegd tijdens een practicumtoets voor scheikunde, dus dan neem je aan dat ze gelijk heeft (ik mocht een pipet uitblazen van haar) maar naderand bleek dat dat niet mocht, en daardoor had ik een 6 in plaats van een 8, en daardoor sta ik nou op zakken. als ik wel een acht zou hebben, staat er nou in mijn cijferlijst dat ik wel geslaagd zou zijnXD
Je zakt natuurlijk niet op 1 vak. Je zakt er op 3.
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
pi_68309483
Ik zou nu zakken op 2 vakken, want die andere was gewoon niet eerlijk gerekend, en volgens mij hoor je pas te zakken bij 3 onvoldoendes..
  donderdag 23 april 2009 @ 17:22:22 #218
62215 qu63
..de tijd drinkt..
pi_68309628
Als die 2 vakken in hetzelfde profiel zitten dan zak je ook...
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  donderdag 23 april 2009 @ 17:48:27 #219
158136 Joooo-pi
Do you want a balloon...
pi_68310368
quote:
Op donderdag 23 april 2009 16:05 schreef Yannick3211 het volgende:
Ok, maar ik moet op elk blad andere data, en hij past zich ook met plakken gewoon aan aan het eigen blad, dus als ik op blad 1 bovenaan 3 april heb staan(in excel codes), en ik kopieer dat, komt op blad 2 natuurlijk ook 3 april te staan. Kan het niet dat je heel snel iets kan doen dat er op elke pagina dus een andere maand (in mijn geval 4 weken) staat?
Je bedoelt met slepen dus eigenlijk "doorvoeren". Slepen kan namelijk ook letterlijk en dan is het knippen/plakken.

Maar idd. je kan alleen cellen / ranges doorvoeren, maar geen hele sheets. Je kan wel formules in cellen zetten die zich aanpassen aan blad 1, zoals qu63 zegt.
heitieh
pi_68310384
quote:
Op donderdag 23 april 2009 17:16 schreef Yannick3211 het volgende:
Ik zou nu zakken op 2 vakken, want die andere was gewoon niet eerlijk gerekend, en volgens mij hoor je pas te zakken bij 3 onvoldoendes..
Ik zou het toch eens navragen bij je mentor of decaan ipv je hoop op een Excel formule te gooien
pi_68329623
hoek21 & HuHu;
Is het nog gelukt met de oplossingen voor jullie op de vorige pagina. Wel leuk om even te horen of het werkt of niet
pi_68330001
quote:
Op woensdag 22 april 2009 14:41 schreef DaFan het volgende:
=SUMPRODUCT(--($A$2:$A$7=$A10)*(B$2:B$7))

En dan doortrekken naar rechts en beneden.
Dat werkt perfect, dank je .
pi_68330008
quote:
Op vrijdag 24 april 2009 10:20 schreef DaFan het volgende:
hoek21 & HuHu;
Is het nog gelukt met de oplossingen voor jullie op de vorige pagina. Wel leuk om even te horen of het werkt of niet
Ow... ja dus .
  vrijdag 24 april 2009 @ 11:43:07 #224
241000 BuupWerk
hAsTaLaPaStA
pi_68332114
hehe gevonden...

vraagje me hyperlinks werken niet meer...iemand een TIP ??
  vrijdag 24 april 2009 @ 11:54:08 #225
62215 qu63
..de tijd drinkt..
pi_68332452
quote:
Op vrijdag 24 april 2009 11:43 schreef BuupWerk het volgende:
hehe gevonden...

vraagje me hyperlinks werken niet meer...iemand een TIP ??
hyperlink aanpassen?

Wat werkt er niet meer, hoe werkte het eerst/hoe zou het moeten werken?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  vrijdag 24 april 2009 @ 12:16:06 #226
241000 BuupWerk
hAsTaLaPaStA
pi_68333135
eerst drukje er op en werd er een word bestand geopend...nu doet tie dat niet meer...maar de links staat er nog...
  vrijdag 24 april 2009 @ 12:19:37 #227
62215 qu63
..de tijd drinkt..
pi_68333220
quote:
Op vrijdag 24 april 2009 12:16 schreef BuupWerk het volgende:
eerst drukje er op en werd er een word bestand geopend...nu doet tie dat niet meer...maar de links staat er nog...
Klopt de link nog wel? Krijg je een foutmelding? Staat het bestand waar naar gelinkt wordt nog op dezelfde plaats? Heb je wel de juiste rechten om het te openen?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  vrijdag 24 april 2009 @ 13:34:09 #228
158136 Joooo-pi
Do you want a balloon...
pi_68335369
Vraagje van mij:

In een script wil ik dit:
1
2
3
4
5
6
7
Aantal = Range("A1").value

dim Variabele(Aantal) as String

For i = 1 to Aantal
Variabele( i ) = ....
Next


Foutmelding:
Compilatiefout:
Expressie voor constante vereist
(op regel 3)

Ik begrijp daaruit dat Aantal een constante moet zijn? Hoe dit op te lossen?
heitieh
pi_68336004
Wat doet die "variabele" in dat script? Normaal begin je met dimmen en dan pas de code.

Verder kan een For loop niet naar een "string" toeloopen. Aantal moet van het type "integer" zijn. Een integer is een geheel getal (dus geen decimalen) Indien nodig kun je de waarde uit cel A1 afronden.
Wat je met regel 6 wil is me ook onduidelijk maar het lijkt me niet verstandig om in een For loop je teller ( i ) te gaan veranderen.
let ook op dat je de loop afsluit met Next i

Zorg dat in cel A1 dus een getal staat.
1
2
3
4
5
6
7
8
9
Dim Aantal as integer

Aantal = Range("A1").Value

For i = 1 to Aantal

berekeningen/handelingen die je wil doen

next i
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
  vrijdag 24 april 2009 @ 14:10:04 #230
158136 Joooo-pi
Do you want a balloon...
pi_68336588
quote:
Op vrijdag 24 april 2009 13:51 schreef Deetch het volgende:
Wat doet die "variabele" in dat script? Normaal begin je met dimmen en dan pas de code.

Verder kan een For loop niet naar een "string" toeloopen. Aantal moet van het type "integer" zijn. Een integer is een geheel getal (dus geen decimalen) Indien nodig kun je de waarde uit cel A1 afronden.
Wat je met regel 6 wil is me ook onduidelijk maar het lijkt me niet verstandig om in een For loop je teller ( i ) te gaan veranderen.
let ook op dat je de loop afsluit met Next i

Zorg dat in cel A1 dus een getal staat.
[ code verwijderd ]
Bedankt voor je antwoord, maar volgens mij maak je opmerkingen over details, want:
- Aantal is idd een integer, hoewel ik dat niet gespecificeerd had.
- Variabele ( i ) neemt in de loop waarden aan uit een range bijv.
Variabele ( i ) = Cells(2,i).value
- Next of Next i werkt allebei wel.
- ik ben niet van plan om de teller i te wijzigen in de loop

Geen oplossing zo, helaas. Ik wil dus een variabele met Aantal waarden definieren.
heitieh
  vrijdag 24 april 2009 @ 14:21:23 #231
158136 Joooo-pi
Do you want a balloon...
pi_68337009
Wat ik nu als oplossing heb is dit:

1
2
3
4
5
Dim Variabele(100) as string

For i = 1 to Aantal
 Variabele ( i ) = Cells(2,i).value
Next i


Waarbij altijd geldt dat Aantal < 100. Dan blijven er altijd (100-Aantal) overbodige variabelen, maar who cares.


Maar ik zou liever voor de elegantere oplossing gaan :D
heitieh
pi_68338803
Deetch, de code op zichzelf klopt wel.
Variabele( i) is dan een array, waarin de i-ste plaats wordt gevuld. Dat kan prima met een For-loop.
1
2
3
4
5
6
7
Aantal = Val(Range("A1").Value)

Dim VariabeleA(Aantal) as Variant

For i = 1 to Aantal
VariabeleA( i ) = ....
Next i

Niet getest.

Ik denk dat het probleem erin zit dat je een variabele Variabele noemt (dus vandaar die A erachter) en een String kan maar 1 waarde vasthouden. Vandaar Variant.
Val() doe ik om de .Value heen om deze zeker weten een Integer te maken.
Ik zou toch Next i gebruiken voor de overzichtelijkheid (nu beetje overbodig maar wacht maar tot je 3 For-loops in elkaar hebt.
  vrijdag 24 april 2009 @ 16:00:39 #233
43584 Beregd
absolutely inch perfect
pi_68340384
vraagje:
quote:
For m = 44 To 56
Rows(cstring(m) & ":" & cstring(m)).Hidden = (ActiveSheet.Cells(m, 4) = "")
Next
werkt niet omdat hij cstring niet kent, wat moet ik gebruiken ipv cstring??
  vrijdag 24 april 2009 @ 16:01:47 #234
158136 Joooo-pi
Do you want a balloon...
pi_68340424
quote:
Op vrijdag 24 april 2009 15:12 schreef DaFan het volgende:
Deetch, de code op zichzelf klopt wel.
Variabele( i) is dan een array, waarin de i-ste plaats wordt gevuld. Dat kan prima met een For-loop.
[ code verwijderd ]

Niet getest.

Ik denk dat het probleem erin zit dat je een variabele Variabele noemt (dus vandaar die A erachter) en een String kan maar 1 waarde vasthouden. Vandaar Variant.
Val() doe ik om de .Value heen om deze zeker weten een Integer te maken.
Ik zou toch Next i gebruiken voor de overzichtelijkheid (nu beetje overbodig maar wacht maar tot je 3 For-loops in elkaar hebt.
In mijn werkelijke script heet de variabele niet Variabele, maar heel anders, dat is het probleem niet. Ik heb String veranderd in Variant, maar dat helpt niet.

Hij loopt vast op het feit dat er een variabele als argument wordt gebruikt bij het definieren van een andere variabele. Dat moet volgens de foutmelding een constante zijn.

Kan dit niet omzeild worden?
heitieh
  vrijdag 24 april 2009 @ 16:05:43 #235
158136 Joooo-pi
Do you want a balloon...
pi_68340536
quote:
Op vrijdag 24 april 2009 16:00 schreef Beregd het volgende:
vraagje:
[..]

werkt niet omdat hij cstring niet kent, wat moet ik gebruiken ipv cstring??
Probeer dit eens:

1
2
3
For m = 44 To 56
Rows(m & ":" & m).Hidden = (ActiveSheet.Cells(m, 4) = "")
Next
heitieh
  vrijdag 24 april 2009 @ 16:09:32 #236
43584 Beregd
absolutely inch perfect
pi_68340654
quote:
Op vrijdag 24 april 2009 16:05 schreef Joooo-pi het volgende:

[..]

Probeer dit eens:
[ code verwijderd ]
werkt, thx!

en mijn it vriendjes nog zeggen dat ik cstring moet gebruiken, tis gewoon veel simpeler
pi_68343395
Ah akkoord joo.
Probeer eens:

Dim VariabeleA() as String
  vrijdag 24 april 2009 @ 19:17:10 #238
158136 Joooo-pi
Do you want a balloon...
pi_68345437
quote:
Op vrijdag 24 april 2009 17:53 schreef DaFan het volgende:
Ah akkoord joo.
Probeer eens:

Dim VariabeleA() as String
Onderstaande code heb ik geprobeerd, maar toch een foutmelding: "Subscript ligt buiten het bereik". Op regel 9. Ik neem aan dat op het moment dat i = 1 de variabeleA(1) buiten bereik ligt? :?

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub CommandButton1_Click()

Dim Aantal As Integer
Aantal = Range("A1").Value

Dim VariabeleA() As String

For i = 1 To Aantal
VariabeleA( i ) = Cells(i, 2).Value
Next i

End Sub
heitieh
pi_68345978
Zo dan maar:
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub CommandButton1_Click()

Dim Aantal As Integer
Dim VariabeleA() As String
    Aantal = Range("A1").Value

ReDim VariabeleA(Aantal) As String

For i = 1 To Aantal
    VariabeleA( i) = Cells(i, 1).Value
Next i

End Sub


ReDim als je de lengte weet
  vrijdag 24 april 2009 @ 19:54:09 #240
158136 Joooo-pi
Do you want a balloon...
pi_68346730
quote:
Op vrijdag 24 april 2009 19:32 schreef DaFan het volgende:
Zo dan maar:
[ code verwijderd ]

ReDim als je de lengte weet


Waarom werkt dat nou wel

Thanx a lot iig
heitieh
pi_68346773
Redim Change the size of the array
  vrijdag 24 april 2009 @ 20:24:05 #242
85514 ralfie
!Yvan eht nioj
pi_68347847
als je een hele range in een var wil gooien kun je beter variants gebruiken, dat werkt honderden keren sneller

dim tt as variant
tt = range("A1:B100")

oid. Kun je daarna desnoods heel snel de variant array doorlopen om de relevante data eruit te picken
pi_68356745
Ik heb 1 grafiek waarin ik afhankelijk van de selectie in een dropdown menu uit verschillende datasets 1 grafieklijn in de grafiek toon. Afhankelijk van de keuze kan de dataset dus bijvoorbeeld van 100 tot 150 lopen of van 200 tot 300, enz. Nu zou ik willen dat de maximale en de minimale waarde van de y-as automatisch wordt aangepast afhankelijk van de gekozen dataset (dus niet steeds handmatig).

Dus als de minimale waarde in de dataset 100 is, moet automastisch de schaal van de y-as bij 100 beginnen etc. Het vervelende is dat de cel waarin dit aangegeven kan worden geen formules of celverwijzing accepteert. Is er een manier om dit toch te regelen of te programmeren?

Excel 2003 NL
pi_68404520
Hallo,

ik heb de volgende tabel:

1
2
3
4
5
6
7
8
team  Klasse  Team nieuw
1        4           -
2        5           -
3        6           -
4        8           -
5        7           -
6        7           -
7        7           -

Zoals je kan zien is de klasse toewijzing niet correct. Wat ik nu wil is dat het 4e team het 7e team wordt en dat de teams 5, 6, 7 er allemaal ééntje opschuiven. Dus
1
2
3
4
5
6
7
8
team  Klasse  Team nieuw
1        4           1
2        5           2
3        6           3
4        8           8
5        7           4
6        7           5
7        7           6

Kan iemand me helpen met een algoritme in Excel2003? Sorteren heb ik al geprobeerd maar dit is praktisch gezien niet mogelijk.
abonnement Unibet Coolblue Bitvavo
Forum Opties
Forumhop:
Hop naar:
(afkorting, bv 'KLB')