abonnement Unibet Coolblue
  woensdag 25 november 2009 @ 22:55:43 #1
62215 qu63
..de tijd drinkt..
pi_75005553


Aangezien er vaker losse topics langskomen, leek het ons handig een centraal Excel topic te maken waar men hun vragen / antwoorden kwijt kan.

Dus heb je vragen, kom je ergens niet uit, hoe maak ik nu precies die macro?

Stel dan hier je vraag!!!

Tip 1: De help functie van excel of visual basic voor excel kan je echt een eind op weg helpen ! (F1)
Tip 2: Als je een vraag stelt, zet er dan bij welke versie je hebt en op welke taal hij ingesteld staat!
Tip 3: Zet macrocode even tussen [ code ] tags
Tip 4: Zelf de formules in verschillende talen vertalen:
http://dolf.trieschnigg.nl/excel/excel.html
http://branders.name/files/Excel-Function-Reference.pdf

Voorgaande deeltjes met veel informatie:

[Excel] Het grote Excel vragen topic
[EXCEL] Het grote Excel vragen topic, #2
[EXCEL] Het grote Excel vragen topic, #3
[EXCEL] Het grote Excel vragen topic, #4
[EXCEL] Het grote Excel vragen topic, #5
[Excel] Het grote Excel-vragentopic #6
[EXCEL] Het grote Excel vragen topic, #7
[EXCEL] Het grote Excel vragen topic, #8
[EXCEL] Het grote Excel vragen topic, #9
[EXCEL] Het grote Excel vragen topic, #10
[EXCEL] Het grote Excel vragen topic, #11
[EXCEL] Het grote Excel vragen topic, #12
[EXCEL] Het grote Excel vragen topic, #13
[EXCEL] Het grote Excel vragen topic, #14
[EXCEL] Het grote Excel vragen topic, #15
[EXCEL] Het grote Excel vragen topic, #16

Nieuw topic? Haal de OP bij de wiki
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  woensdag 25 november 2009 @ 23:01:18 #2
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75005810
Via voorwaardelijke opmaak kan ik wel een enkele cel doen, maar het gaat om een combinatie van 5-6 cellen die identiek moeten zijn wil dit als duplicaat aangemerkt worden.

Eigenlijk wil ik de exacte functie van de duplicaten verwijderen en alleen het verwijderen vervangen door invullen met bv. geel.
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
  donderdag 26 november 2009 @ 07:16:53 #3
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75010196
quote:
Op woensdag 25 november 2009 23:01 schreef sanger het volgende:
Via voorwaardelijke opmaak kan ik wel een enkele cel doen, maar het gaat om een combinatie van 5-6 cellen die identiek moeten zijn wil dit als duplicaat aangemerkt worden.

Eigenlijk wil ik de exacte functie van de duplicaten verwijderen en alleen het verwijderen vervangen door invullen met bv. geel.
Misschien iets duidelijker maken. Ik heb een bestand met enkele duizenden regels. Ik heb het vermoeden dat er dubbele regels inzitten terwijl dat niet de bedoeling is. Ik wil dus die dubbele regels herkennen. Een regel kan als dubbel worden aangemerkt als de invoer in kolommen A, B, C, E en G gelijk zijn aan elkaar.

Met de functie duplicaten verwijderen kun je deze wel verwijderen. Maar als ik ze verwijderen weet ik nog steeds niet welke regels er duplicaat waren (kan het wel doen, maar das een stuk omslachtiger). Ik wil dus wel de exacte mogelijkheden van de functie duplicaten verwijderen, maar alleen het verwijderen vervangen voor markeren/arceren/kopieeren naar andere map.
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75010325
Kan wel macrootje voor je schrijven. Begint de data op rij 2?
  donderdag 26 november 2009 @ 07:53:28 #5
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75010353
quote:
Op donderdag 26 november 2009 07:49 schreef DaFan het volgende:
Kan wel macrootje voor je schrijven. Begint de data op rij 2?
Dat zou mooi zijn



Alleen de kolommen wil je dan exact weten neem ik aan? Die ik hierboven noemde waren voorbeelden.
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
  donderdag 26 november 2009 @ 07:56:37 #6
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75010384
quote:
Op donderdag 26 november 2009 07:53 schreef sanger het volgende:

[..]

Dat zou mooi zijn



Alleen de kolommen wil je dan exact weten neem ik aan? Die ik hierboven noemde waren voorbeelden.
De kolommen waar de match op moet komen zijn:

B, F, G, AE
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75010931
Aub
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Sub Dubbel()

    lastrow = Range("B65536").End(xlUp).Row
    
    For i = 2 To lastrow
        TempVal = Range("B" & i).Value
        
        For j = i + 1 To lastrow
            
            If Range("B" & i).Value = Range("B" & j).Value Then
            If Range("F" & i).Value = Range("F" & j).Value Then
            If Range("G" & i).Value = Range("G" & j).Value Then
            If Range("AE" & i).Value = Range("AE" & j).Value Then
                Rows(j).Interior.ColorIndex = 4
            End If
            End If
            End If
            End If
        Next j
    Next i

End Sub


Weet iemand waarom 4 nested If-loops wel werken en dit niet:
1
2
3
4
5
6
7
            If Range("B" & i).Value = Range("B" & j).Value & _
                Range("F" & i).Value = Range("F" & j).Value & _
                Range("G" & i).Value = Range("G" & j).Value & _
                Range("AE" & i).Value = Range("AE" & j).Value Then
                
                Rows(j).Interior.ColorIndex = 4
            End If
  donderdag 26 november 2009 @ 09:32:44 #8
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75011606
quote:
Op donderdag 26 november 2009 09:00 schreef DaFan het volgende:
Aub
[ code verwijderd ]

Weet iemand waarom 4 nested If-loops wel werken en dit niet:
[ code verwijderd ]


SUPER!!!!

Ga hem vanmiddag uitproberen
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75011683
Ik heb hem alleen getest met 3 rijen waarvan rij 2 en 4 gelijk waren. Rij 4 werd groen. Als je een andere kleur wilt moet je Colorindex = 4 even aanpassen (geen idee wat geel is trouwens )
Dus ik weet niet 100% zeker hoe het gaat met meerdere duplicaten en veel meer rijen.

Hoor het wel
  donderdag 26 november 2009 @ 09:51:59 #10
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75012014
quote:
Op donderdag 26 november 2009 09:36 schreef DaFan het volgende:
Ik heb hem alleen getest met 3 rijen waarvan rij 2 en 4 gelijk waren. Rij 4 werd groen. Als je een andere kleur wilt moet je Colorindex = 4 even aanpassen (geen idee wat geel is trouwens )
Dus ik weet niet 100% zeker hoe het gaat met meerdere duplicaten en veel meer rijen.

Hoor het wel
Als ik eerlijk moet zijn maakt de kleur me niets uit. Al had je voor roze gekozen Het gaat me puur om de functionaliteit.
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75012266
quote:
Op donderdag 26 november 2009 09:51 schreef sanger het volgende:

[..]

Als ik eerlijk moet zijn maakt de kleur me niets uit. Al had je voor roze gekozen Het gaat me puur om de functionaliteit.
overzichtje colorindex
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_75012391
Nice.
pi_75012577
Hoe kan het dat wanneer ik een Excel bestand waarin wij kleine bedrijfsicoontjes hebben geplaatst als marker en deze omzet naar PDF, een deel van de icoontjes plat worden?
pi_75013823
tvp
  donderdag 26 november 2009 @ 12:36:28 #15
158136 Joooo-pi
Do you want a balloon...
pi_75016591
=ALS(T;V;P)
heitieh
  donderdag 26 november 2009 @ 12:38:10 #16
62215 qu63
..de tijd drinkt..
pi_75016655
quote:
Op donderdag 26 november 2009 12:36 schreef Joooo-pi het volgende:
=ALS(T;V;P)
P
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75018682
Je kunt beter één kaars opsteken dan duizend maal de duisternis vervloeken.
pi_75020050
quote:
Op donderdag 26 november 2009 10:19 schreef EddyAlbena het volgende:
Hoe kan het dat wanneer ik een Excel bestand waarin wij kleine bedrijfsicoontjes hebben geplaatst als marker en deze omzet naar PDF, een deel van de icoontjes plat worden?
Welke versie van excel, wat voor type plaatjes, hoe in het document geplaatst.
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
  donderdag 26 november 2009 @ 18:37:15 #19
95427 Hephaistos.
¯¯¯¯¯¯¯¯¯¯¯¯¯
pi_75028383
Zit nu al een hele tijd te prutsen, maar kom er niet uit... Hoop dat iemand me hier kan helpen

Excel 2007 - Nederlands

Het probleem: Ik heb een stuk of 200 bestanden, die allemaal op dezelfde manier zijn opgebouwd. Uit die 200 bestanden wil ik de inhoud van negen verschillende cellen kopieren naar een nieuw totaalbestand. Dus bijvoorbeeld:

- Cel 2A van blad 1
- Cel 5H van blad 1
- Cel 3B van blad 4
En dat de gegevens van die cellen dus netjes onder elkaar in het totaalbestand terechtkomen.

Ik heb al geprobeerd om te prutsen met macro's, maar daar loop ik telkens tegen het probleem aan dat die macro alleen verwijst naar de cellen in één bestand. Zodra ik dezelfde macro dan in een ander bestand probeer uit te voeren, geeft ie een foutmelding.


Iemand die raad weet?
  donderdag 26 november 2009 @ 18:51:04 #20
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75028770
quote:
Op donderdag 26 november 2009 10:03 schreef Deetch het volgende:

[..]

overzichtje colorindex
[ afbeelding ]


Ik ben er door omstandigheden nog niet aan toegekomen de macro te testen. Ik hoop vanavond of morgen tijd te vinden, anders het weekend
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75029765
Weet iemand ook of dit mogelijk is in excel?



Het gaat er om dat de waarden van die lijnen automatisch mee veranderen wanneer ik ze wijzig.
  donderdag 26 november 2009 @ 19:31:00 #22
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75030100
quote:
Op donderdag 26 november 2009 19:21 schreef Heinz__ het volgende:
Weet iemand ook of dit mogelijk is in excel?

[ afbeelding ]

Het gaat er om dat de waarden van die lijnen automatisch mee veranderen wanneer ik ze wijzig.
Welke lijnen bedoel je? De X-as en de Y-as?
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75030165
quote:
Op donderdag 26 november 2009 19:31 schreef sanger het volgende:

[..]

Welke lijnen bedoel je? De X-as en de Y-as?
Die T-lijn etc.
  donderdag 26 november 2009 @ 21:15:00 #24
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75033739
quote:
Op donderdag 26 november 2009 19:32 schreef Heinz__ het volgende:

[..]

Die T-lijn etc.
Als het goed is past de lijn zich aan zodra je de gegevens in de tabel aanpast
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75044958
Loopen door files
Blegh.

(Kom er nog niet uit sanger).
pi_75044997
Vraagje.
Ik werk met een systeem waar we CSV's uit exporteren.
Het probleem is echter dat de kolommen door komma's worden gescheiden en niet door puntkomma's.
Dit heeft als gevolg dat Excel 2003 ze niet direct wil openen en ook niet de CSV wil opslaan met komma's.
Nu kan ik in de Regional settings de taal naar "English (United Kingdom)" zetten, maar dat is zo omslachtig.
Iemand een tip?
  vrijdag 27 november 2009 @ 09:17:05 #27
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75045227
quote:
Op vrijdag 27 november 2009 09:04 schreef STING het volgende:
Vraagje.
Ik werk met een systeem waar we CSV's uit exporteren.
Het probleem is echter dat de kolommen door komma's worden gescheiden en niet door puntkomma's.
Dit heeft als gevolg dat Excel 2003 ze niet direct wil openen en ook niet de CSV wil opslaan met komma's.
Nu kan ik in de Regional settings de taal naar "English (United Kingdom)" zetten, maar dat is zo omslachtig.
Iemand een tip?
Komma's vervangen door puntkomma's?

Alles selecteren waar je de vervanging wilt doen. Dan vervolgens zoeken/vervangen.
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75045289
quote:
Op vrijdag 27 november 2009 09:17 schreef sanger het volgende:

[..]

Komma's vervangen door puntkomma's?

Alles selecteren waar je de vervanging wilt doen. Dan vervolgens zoeken/vervangen.
Dat is een workarond die ik heb geprobeerd toe te passen, echter.. zitten er ook komma's in sommige velden.
OpenOffice Calc gaat hier op zich een stuk beter mee om, maar dat is voor de rest echt een K-pakket.
pi_75045954
Tja daarom is het eerste wat ik doe op mijn PC de regionale settings in engels zetten of gewoon direct een engelse versie installeer. Dan heb je al dat gezeik met puntkomma's ipv komma's decimale komma's ipv decimale punten niet.

Je zou de CSV ipv open kunnen importeren en dan scheiden op puntkomma. Als je dat dan opneemt met je macrorecorer kun je hem ook nog naar wens aanpassen.
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_75046099
quote:
Op vrijdag 27 november 2009 09:48 schreef Deetch het volgende:
Tja daarom is het eerste wat ik doe op mijn PC de regionale settings in engels zetten of gewoon direct een engelse versie installeer. Dan heb je al dat gezeik met puntkomma's ipv komma's decimale komma's ipv decimale punten niet.

Je zou de CSV ipv open kunnen importeren en dan scheiden op puntkomma. Als je dat dan opneemt met je macrorecorer kun je hem ook nog naar wens aanpassen.
Tweede probleem heeft helaas dat Excel de kolommen niet goed scheidt.
Voorbeeld:

Bron:
"Piet,","van Puk","M'
wordt:
Piet,,van Puk,M

Voor de rest is Excel m'n big friend, maar qua CSV's
  vrijdag 27 november 2009 @ 15:23:31 #31
95427 Hephaistos.
¯¯¯¯¯¯¯¯¯¯¯¯¯
pi_75057765
Iemand?
quote:
Op donderdag 26 november 2009 18:37 schreef Hephaistos. het volgende:
Zit nu al een hele tijd te prutsen, maar kom er niet uit... Hoop dat iemand me hier kan helpen

Excel 2007 - Nederlands

Het probleem: Ik heb een stuk of 200 bestanden, die allemaal op dezelfde manier zijn opgebouwd. Uit die 200 bestanden wil ik de inhoud van negen verschillende cellen kopieren naar een nieuw totaalbestand. Dus bijvoorbeeld:

- Cel 2A van blad 1
- Cel 5H van blad 1
- Cel 3B van blad 4
En dat de gegevens van die cellen dus netjes onder elkaar in het totaalbestand terechtkomen.

Ik heb al geprobeerd om te prutsen met macro's, maar daar loop ik telkens tegen het probleem aan dat die macro alleen verwijst naar de cellen in één bestand. Zodra ik dezelfde macro dan in een ander bestand probeer uit te voeren, geeft ie een foutmelding.


Iemand die raad weet?
pi_75058581
quote:
Op vrijdag 27 november 2009 15:23 schreef Hephaistos. het volgende:
Iemand?
[..]
quote:
Op vrijdag 27 november 2009 09:02 schreef DaFan het volgende:
Loopen door files
Blegh.

(Kom er nog niet uit sanger).
Ik bedoelde jou
pi_75061281
quote:
Op vrijdag 27 november 2009 15:23 schreef Hephaistos. het volgende:
Iemand?
[..]


Ik raad je met klem aan de informatie uit die 200 bestanden (?????? Tilt) in 1 fraaie
database om te zetten (in 1 bestand dus).

Je krijgt anders een gigantische spaghetti
aan gegevens
Je kunt beter één kaars opsteken dan duizend maal de duisternis vervloeken.
  zaterdag 28 november 2009 @ 06:24:57 #34
259770 iamcj
Niets is onmogelijk
pi_75078592
quote:
Op vrijdag 27 november 2009 15:23 schreef Hephaistos. het volgende:
Iemand?
[..]


' Zet deze functie in een module van spreadsheet totaal
' Kies menu - > extra -> verwijzingen -> Microsoft scripting runtime aanvinken

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Public Function ImportData()
  Dim fs As FileSystemObject
  Dim f As File
  Dim wb As Workbook
  Dim strLoc As String
  Dim nr As Integer
  
  strLoc = "c:\Files" 'Zet alleen excelfiles in deze folder
  
  Set fs = New FileSystemObject
  
  For Each f In fs.GetFolder(strLoc).Files
    Set wb = Application.Workbooks.Open(f.Path)
    nr = nr + 1
    Blad1.Cells(nr, 1) = wb.Sheets(3).Range("A1")
    Blad1.Cells(nr, 2) = wb.Sheets("hoi").Range("A2")
    wb.Close False
  Next f
  
End Function


Het kan ook anders, beter en sneller, maar dit is het best te begrijpen denk ik.
Wie bang is voor morgen, kan niet genieten van vandaag.
Religie is als taal, een basisbehoefte voor een maatschappij, iedereen spreekt zijn eigen dialect en even verder op begrijp je niet meer wat de ander zegt.
  Moderator / Redactie Sport zaterdag 28 november 2009 @ 12:18:27 #35
92686 crew  borisz
Keurmeester
pi_75081341
Zijn er nu ook goede boeken/programma's over Excel die wat verder gaat dan 'zo maak een cel vet of cursief' ?

De basis van excel dingen ken ik wel, ik wil wat meer leren over Excel dan alleen de basis .
winnaar wielerprono 2007 :) Last.FM
pi_75082705
quote:
Op zaterdag 28 november 2009 12:18 schreef borisz het volgende:
Zijn er nu ook goede boeken/programma's over Excel die wat verder gaat dan 'zo maak een cel vet of cursief' ?

De basis van excel dingen ken ik wel, ik wil wat meer leren over Excel dan alleen de basis .
Op youtube staan verschillende 'advanced' filmpjes.
  zaterdag 28 november 2009 @ 15:27:39 #37
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75085250
quote:
Op zaterdag 28 november 2009 12:18 schreef borisz het volgende:
Zijn er nu ook goede boeken/programma's over Excel die wat verder gaat dan 'zo maak een cel vet of cursief' ?

De basis van excel dingen ken ik wel, ik wil wat meer leren over Excel dan alleen de basis .
Er zijn zat cursussen/trainingen ook. Wel prijzig overigens, en vaak heel specifiek op een bepaald gebruikersdoel gericht.
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
  zaterdag 28 november 2009 @ 15:40:19 #38
62215 qu63
..de tijd drinkt..
pi_75085587
quote:
Op zaterdag 28 november 2009 12:18 schreef borisz het volgende:
Zijn er nu ook goede boeken/programma's over Excel die wat verder gaat dan 'zo maak een cel vet of cursief' ?

De basis van excel dingen ken ik wel, ik wil wat meer leren over Excel dan alleen de basis .
Leer je niet makkelijker/sneller door gewoon jezelf uit te dagen iets moeilijks te maken?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  zaterdag 28 november 2009 @ 15:42:40 #39
95427 Hephaistos.
¯¯¯¯¯¯¯¯¯¯¯¯¯
pi_75085644
quote:
Op zaterdag 28 november 2009 06:24 schreef iamcj het volgende:

[..]

' Zet deze functie in een module van spreadsheet totaal
' Kies menu - > extra -> verwijzingen -> Microsoft scripting runtime aanvinken
[ code verwijderd ]

Het kan ook anders, beter en sneller, maar dit is het best te begrijpen denk ik.
Super, ik ga het morgen eens even proberen...
pi_75095931
Hallo,

Wanneer je sorteert in 2 kolommen, is dat dan niet met "with" neer te zetten?
Want dit werkt namelijk niet:

With Sheets("qty").sort
.SetRange Range("C4:L" & Range("L" & Rows.Count).End(xlUp).Row)
.Key1 = Range("C4")
.Order1 = xlAscending
.Key2 = Range("H4")
.Order2 = xlAscending
.Header = xlNo
.OrderCustom = 1
.MatchCase = False
.Orientation = xlTopToBottom
.Apply
End With

Bedankt.
  zaterdag 28 november 2009 @ 21:53:33 #41
158136 Joooo-pi
Do you want a balloon...
pi_75096340
quote:
Op zaterdag 28 november 2009 21:38 schreef hendrik2009 het volgende:
Hallo,

Wanneer je sorteert in 2 kolommen, is dat dan niet met "with" neer te zetten?
Want dit werkt namelijk niet:

With Sheets("qty").sort
.SetRange Range("C4:L" & Range("L" & Rows.Count).End(xlUp).Row)
.Key1 = Range("C4")
.Order1 = xlAscending
.Key2 = Range("H4")
.Order2 = xlAscending
.Header = xlNo
.OrderCustom = 1
.MatchCase = False
.Orientation = xlTopToBottom
.Apply
End With

Bedankt.
Probeer met .autofilter ertussen, op deze manier:
With ActiveWorkbook.Worksheets("Blad1").AutoFilter.Sort
[...]
heitieh
pi_75096539
quote:
Op zaterdag 28 november 2009 21:53 schreef Joooo-pi het volgende:

[..]

Probeer met .autofilter ertussen, op deze manier:
With ActiveWorkbook.Worksheets("Blad1").AutoFilter.Sort
[...]
thanks, maar werkt ook niet.
krijg de melding dat die key1 niet een bekend object is.

heb het nu zo, maar "with" is zo lekker overizchtelijk

Sheets("qty").Range("C4:L" & Range("L" & Rows.Count).End(xlUp).Row).sort Key1:=Range("C4"), Order1:=xlAscending, _
Key2:=Range("H4"), Order2:=xlAscending, Header:=xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
  zondag 29 november 2009 @ 23:50:51 #43
179598 Deprater
werken fijn, niks doen beter
  zondag 29 november 2009 @ 23:51:47 #44
179598 Deprater
werken fijn, niks doen beter
pi_75130940
quote:
Op zaterdag 28 november 2009 12:18 schreef borisz het volgende:
Zijn er nu ook goede boeken/programma's over Excel die wat verder gaat dan 'zo maak een cel vet of cursief' ?

De basis van excel dingen ken ik wel, ik wil wat meer leren over Excel dan alleen de basis .
wat denk je van een advanced cursus??
pi_75135528
quote:
Op zondag 29 november 2009 23:51 schreef Deprater het volgende:

[..]

wat denk je van een advanced cursus??
Dan moet je wel weten wat je precies zoekt en heel kritisch de cursusinfo doornemen omdat advanced cursussen vaak specifiek op een bepaald doel gericht zijn.
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
  maandag 30 november 2009 @ 13:29:50 #46
271205 Dj_unkie
Industrialized
pi_75140871
oke ik heb ook een probleem!

Ik heb ene rekenmodel gemaakt waarmee ik omzet/winst/kosten van een afdeling kan bepalen aan de hand van aantallen verschillende personeelsleden. Dus één monteur zet per jaar zoveel om, maar als ik er 3 neem moet er ook een werkvoorbereider bij. Omdat er nogal wat variabele waarden in zitten (marges, percentages van binnendienst die aan klant doorberekend wordt, verhoudingen werk/materiaal). Nu werkt het model prima, maar ik wil verschillende combinaties invoeren en dat die in een grafiek worden weergegeven.

Maar hoe maak ik een input die zijn waarde vanuit meerdere cellen pakt en dat in meerdere cellen uitspuugt? Anders blijf ik steeds weer handmatig gegevens aanpassen!
Stand for something or fall for anything
pi_75141259
Je verhaal is niet echt duidelijk, heb je een voorbeeld sheet of plaatje met uitleg?
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
  maandag 30 november 2009 @ 13:49:17 #48
271205 Dj_unkie
Industrialized
pi_75141590
http://img188.imageshack.us/i/screenie.gif/

Links bovenin kan ik de aantallen in verschillende personeelsleden invoeren. Ik moet verschillende combinaties invoeren die allemaal in een grafiek moeten komen. Dus ik moet bijvoorbeeld 1 WVB, 1 PL, en 3 MNTR's invoeren en daar komt wordt er een omzet en marge berekend. Ik wil dus verschillende combinaties invoeren en daar meerdere uitkomsten uit verkrijgen zodat ik die kan verwerken in een lijndiagram.

Beetje duidelijk? Thnx!
Stand for something or fall for anything
  maandag 30 november 2009 @ 14:43:03 #49
271205 Dj_unkie
Industrialized
pi_75143348
Laat maar ik heb het al opgelost...het is makkelijker om die formule gewoon een paar maal onder elkaar te zetten, dan kan ik ook onafhankelijk variabelen veranderen

thanx anyway
Stand for something or fall for anything
pi_75145073
Dus als je C2, C3 en C4 naar wens aanpast verander je de uitkomst in G21:L21?

Met onderstaande macro maak je een tabelletje met alle mogelijke combinaties.
Allereerst berekenen op handmatig

De tabel start in A25
De variable P, Q en R zijn de hoeveelheid van de werknemers in C2, C3, C4.
P = Werkvoorbereider, Q = Ploegleider, R = Monteur
Vervolgens wordt de nieuwe winst berekend (cel I21) en wordt het tabelletje gemaakt

De maximale hoeveelheid van bepaalde werknemers kun je aanpassen door de regel For P = 0 To 2 aan te passen naar wens. Je kunt de 2 dan vervangen door een hoger getal (de 0 eventueel ook). Zelfde geldt voor de regel van q en r.
Let op dat de tabel erg groot wordt als je meer medewerkerstypes of aantallen gaat toevoegen.

Van de kolom D en E kun je dan je lijndiagram maken.

mijn advies: klein beginnen.


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
Sub Tabelletje()
'
' Tabelletje Macro

Application.Calculation = xlManual
Range("A25").Select
For P = 0 To 2
    For Q = 0 To 2
        For R = 0 To 2
        Range("C2").Value = P
        Range("C3").Value = Q
        Range("C4").Value = R
        Calculate
        ActiveCell.Value = P
        ActiveCell.Offset(0, 1) = Q
        ActiveCell.Offset(0, 2) = R
        Activecell.Offset(0, 3) = P & " WVB, " & Q & " PL, " & R & " MNTR"
        ActiveCell.Offset(0, 4) = Range("I21").Value
        ActiveCell.Offset(1, 0).Select
        Next r
    Next q
Next p

Application.Calculation = xlAutomatic
    
End Sub


[ Bericht 7% gewijzigd door Deetch op 30-11-2009 15:35:37 ( verduidelijking) ]
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_75145619
quote:
Op maandag 30 november 2009 14:43 schreef Dj_unkie het volgende:
Laat maar ik heb het al opgelost...het is makkelijker om die formule gewoon een paar maal onder elkaar te zetten, dan kan ik ook onafhankelijk variabelen veranderen

thanx anyway
grrr, deze had ik dus gemist, nevermind.
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
  maandag 30 november 2009 @ 15:49:40 #52
73305 Stpan
Zullen wij laten hoo-ooren...
pi_75145760
Excel 2007, Engels.

Ik heb iets waar ik maar niet uitkom. Ik ben nummers aan het uitvullen.

Dus 1234 wordt 01234 (5 cijfers)
Met formule:
=IF(LEN(F2)=4;"0"&F2;IF(LEN(F2)=3;"00"&F2;IF(LEN(F2)=2;"000"&F2;"OK")))

Nu wil ik dat wanneer cel F2 al 5 cijfers of langer is, dat ik dan niet 'OK' krijg, maar de waarde van cel F2.
=F2 zorgt ervoor dat ik de tekst =F2 krijg.
Als ik de aanhalingstekening weglaat idem.

Kortom, een kleine tweak en ik ben een happy man, maar welke tweak?
pi_75146099
Okay, ik heb de volgende data:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Datum      waarde 1   waarde 2   Waarde 3
10-3-2008   372,8    137.237,7   29,39
14-3-2008   462,2    137.699,9   36,23
19-3-2008   413,4    138.113,3   31,87
26-3-2008   454,1    138.567,4   35,82
2-4-2008    401,1    138.968,5   28,43
9-4-2008    430,2    139.398,7   33,45
13-4-2008   431,8    139.830,5   30,31
16-4-2008   349,6    140.180,1   23,71
21-4-2008   468,9    140.649,0   33,35
27-4-2008   501,4    141.150,4   36,59
7-5-2008    469,7    141.620,1   28,31
12-5-2008   401,1    142.021,2   28,07
17-5-2008   590,1    142.611,3   36,63
23-5-2008   539,7    143.151,0   35,55

De data lopen door tot vandaag en verder.

Nu wil ik graag de volgende cellen creëren:
1- Gemiddelde per jaar. (Van elk jaar apart)
2- Gemiddelde per maand. (Ook apart)
3- Gemiddelde per week.
Maar aangezien er een onregelmatige tijd zit tussen elke waarneming, krijg ik dit niet voorelkaar. (Ben wel een beetje een excel noob.)

Versie 2007 NL.

Nog een lastigere:

Stel, ik wil het vollopen van een bad simuleren met excel.
Dus ik heb:
1-Een bad
2-Een instelbare afvoer van dat bad
3-Een instelbare water toevoer

Dus ik laat bv het bad (100l) vollopen met 10l/min terwijl de afvoer ingesteld staat op 5l/min.
Het bad zal dus volstromen met 5l/min.
Dit wil ik 'live' in beeld krijgen. Dus als ik bv de afvoer opschroef, dat ik het bad (Als zijnde een grafiek) zie dalen en andersom.
Er moet dus iets van een lus gecreëerd worden waarin ik continue kan ingrijpen en veranderen.

Met BVD.

[ Bericht 11% gewijzigd door mien-moeke op 30-11-2009 16:04:25 ]
pi_75147387
quote:
Op maandag 30 november 2009 15:49 schreef Stpan het volgende:
=IF(LEN(F2)=4;"0"&F2;IF(LEN(F2)=3;"00"&F2;IF(LEN(F2)=2;"000"&F2;"OK")))
ik weet niet hoe je engels combineert met ; maar vooruit.

Vervang "OK" door F2, zonder = ervoor en ook zonder aanhalingstekens
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_75147627
quote:
Op maandag 30 november 2009 15:59 schreef mien-moeke het volgende:
Okay, ik heb de volgende data:
[ code verwijderd ]

De data lopen door tot vandaag en verder.

Nu wil ik graag de volgende cellen creëren:
1- Gemiddelde per jaar. (Van elk jaar apart)
2- Gemiddelde per maand. (Ook apart)
3- Gemiddelde per week.
Maar aangezien er een onregelmatige tijd zit tussen elke waarneming, krijg ik dit niet voorelkaar. (Ben wel een beetje een excel noob.)

Versie 2007 NL.

Nog een lastigere:

Stel, ik wil het vollopen van een bad simuleren met excel.
Dus ik heb:
1-Een bad
2-Een instelbare afvoer van dat bad
3-Een instelbare water toevoer

Dus ik laat bv het bad (100l) vollopen met 10l/min terwijl de afvoer ingesteld staat op 5l/min.
Het bad zal dus volstromen met 5l/min.
Dit wil ik 'live' in beeld krijgen. Dus als ik bv de afvoer opschroef, dat ik het bad (Als zijnde een grafiek) zie dalen en andersom.
Er moet dus iets van een lus gecreëerd worden waarin ik continue kan ingrijpen en veranderen.

Met BVD.
je kunt van elke periode het gemiddelde berekenen door de meetwaarden van twee data van elkaar af te en te delen door het verschil van de datums

1
2
3
4
5
6
7
    A                   B
1 12-01-2008   15 
2 18-10-2008   18

Daggemiddelde: (b2-b1)/(a2-a1)
Jaargemiddelde: 365*(b2-b1)/(a2-a1)
Maandgemiddelde: 365*(b2-b1)/(12*(a2-a1))


De lastigere: Live zal moeilijk worden.

Wat je wel kan doen is een tabel maken
Kolom A de tijd in minuten
Kolom B de vulsnelheid
Kolom C de leegloopsnelheid
Kolom D het volume

A1: 0
A2: 1
A3: 2
etc etc

B en C naar wens invullen

D1: 0
D2: =D1+(A2-A1)*(B1-C1)
D2 doorkopieren naar D3 en verder

Belangrijk: De waarde voor leegloop en vulsnelheid geldt vanaf het tijdstip in kolom A. Dus tot tijdstip A2 vult het bad met snelheid B1 en loopt het leeg met snelheid C1

Door nu op verschillende tijdstippen B en C te veranderen zie je de grafiek veranderen.

[ Bericht 26% gewijzigd door Deetch op 30-11-2009 16:39:08 ]
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_75147784
quote:
Op maandag 30 november 2009 15:49 schreef Stpan het volgende:
Excel 2007, Engels.

Ik heb iets waar ik maar niet uitkom. Ik ben nummers aan het uitvullen.

Dus 1234 wordt 01234 (5 cijfers)
Met formule:
=IF(LEN(F2)=4;"0"&F2;IF(LEN(F2)=3;"00"&F2;IF(LEN(F2)=2;"000"&F2;"OK")))

Nu wil ik dat wanneer cel F2 al 5 cijfers of langer is, dat ik dan niet 'OK' krijg, maar de waarde van cel F2.
=F2 zorgt ervoor dat ik de tekst =F2 krijg.
Als ik de aanhalingstekening weglaat idem.

Kortom, een kleine tweak en ik ben een happy man, maar welke tweak?
Nvm, Deetch begreep je vraag anders...makes sense
  maandag 30 november 2009 @ 17:10:43 #57
73305 Stpan
Zullen wij laten hoo-ooren...
pi_75149304
Dan heb ik denk ik m'n settings op NL ofzo staan, want met komma's werkte het niet, met punt/komma wel.

Anyweejs, nu lukt het wel. Thanks.
  woensdag 2 december 2009 @ 18:07:17 #58
259770 iamcj
Niets is onmogelijk
pi_75219301
quote:
Op maandag 30 november 2009 15:59 schreef mien-moeke het volgende:
Okay, ik heb de volgende data:
[ code verwijderd ]

De data lopen door tot vandaag en verder.

Nu wil ik graag de volgende cellen creëren:
1- Gemiddelde per jaar. (Van elk jaar apart)
2- Gemiddelde per maand. (Ook apart)
3- Gemiddelde per week.
Maar aangezien er een onregelmatige tijd zit tussen elke waarneming, krijg ik dit niet voorelkaar. (Ben wel een beetje een excel noob.)

Versie 2007 NL.

Nog een lastigere:

Stel, ik wil het vollopen van een bad simuleren met excel.
Dus ik heb:
1-Een bad
2-Een instelbare afvoer van dat bad
3-Een instelbare water toevoer

Dus ik laat bv het bad (100l) vollopen met 10l/min terwijl de afvoer ingesteld staat op 5l/min.
Het bad zal dus volstromen met 5l/min.
Dit wil ik 'live' in beeld krijgen. Dus als ik bv de afvoer opschroef, dat ik het bad (Als zijnde een grafiek) zie dalen en andersom.
Er moet dus iets van een lus gecreëerd worden waarin ik continue kan ingrijpen en veranderen.

Met BVD.


Dit kan met Matrxforumeles bv:

{=GEMIDDELDE(ALS($A$18:$A$33>C23;ALS($A$18:$A$33<C24;$B$18:$B$33;0);0))}

Kies de wizard voorwaardelijk som (invoegtoepassing )en vervang som door gemiddelde.

Cel altijd verlaten met Ctr + Schift + Enter.
Wie bang is voor morgen, kan niet genieten van vandaag.
Religie is als taal, een basisbehoefte voor een maatschappij, iedereen spreekt zijn eigen dialect en even verder op begrijp je niet meer wat de ander zegt.
pi_75227445
quote:
Op maandag 30 november 2009 15:59 schreef mien-moeke het volgende:
Okay, ik heb de volgende data:
[ code verwijderd ]

De data lopen door tot vandaag en verder.

Nu wil ik graag de volgende cellen creëren:
1- Gemiddelde per jaar. (Van elk jaar apart)
2- Gemiddelde per maand. (Ook apart)
3- Gemiddelde per week.
Maar aangezien er een onregelmatige tijd zit tussen elke waarneming, krijg ik dit niet voorelkaar. (Ben wel een beetje een excel noob.)

Leuk, ik ben ook naar dit op zoek.
Verheldering.
Ik heb een lijst met datums die over verschillende jaren heen lopen.
Wat ik wil is een selectie die de 1e en laatste datum in een jaar kan vinden (en dan iets kan doen met de data erbij).
Voorbeeld:
06-01-2008 5
02-09-2008 11
20-12-2008 21
01-01-2009 26
30-11-2008 32

Die waarden in de 2e kolom lopen altijd op.
Nu wil ik voor elk jaar zoiets doen:
- selecteer de 1e datum in het jaar; en de laatste datum in het jaar.
- Trek de twee data-waarden van elkaar af (21-5=16). Trek de twee datums van elkaar af (20 dec 2008 - 6 jan 2008).
En dan kan ik die waarden gebruiken om het verbruik in 2008 te berekenen.

Dus de vraag is: Hoe vind ik de 1e en de laatste datum van een jaar in zo'n lijst?
pi_75228130
quote:
Op woensdag 2 december 2009 18:07 schreef iamcj het volgende:

[..]

Dit kan met Matrxforumeles bv:

{=GEMIDDELDE(ALS($A$18:$A$33>C23;ALS($A$18:$A$33<C24;$B$18:$B$33;0);0))}

Kies de wizard voorwaardelijk som (invoegtoepassing )en vervang som door gemiddelde.

Cel altijd verlaten met Ctr + Schift + Enter.
Vind t een hele mooie formule maar snap niet wat ie doet.
Kun je m stap voor stap proberen uit te leggen?
pi_75228168
quote:
Op woensdag 2 december 2009 21:29 schreef mgerben het volgende:

[..]

Leuk, ik ben ook naar dit op zoek.
Verheldering.
Ik heb een lijst met datums die over verschillende jaren heen lopen.
Wat ik wil is een selectie die de 1e en laatste datum in een jaar kan vinden (en dan iets kan doen met de data erbij).
Voorbeeld:
06-01-2008 5
02-09-2008 11
20-12-2008 21
01-01-2009 26
30-11-2008 32

Die waarden in de 2e kolom lopen altijd op.
Nu wil ik voor elk jaar zoiets doen:
- selecteer de 1e datum in het jaar; en de laatste datum in het jaar.
- Trek de twee data-waarden van elkaar af (21-5=16). Trek de twee datums van elkaar af (20 dec 2008 - 6 jan 2008).
En dan kan ik die waarden gebruiken om het verbruik in 2008 te berekenen.

Dus de vraag is: Hoe vind ik de 1e en de laatste datum van een jaar in zo'n lijst?
Juist. Dat ja.
pi_75247252
quote:
Op woensdag 2 december 2009 21:29 schreef mgerben het volgende:

[..]

Leuk, ik ben ook naar dit op zoek.
Verheldering.
Ik heb een lijst met datums die over verschillende jaren heen lopen.
Wat ik wil is een selectie die de 1e en laatste datum in een jaar kan vinden (en dan iets kan doen met de data erbij).
Voorbeeld:
06-01-2008 5
02-09-2008 11
20-12-2008 21
01-01-2009 26
30-11-2008 32

Die waarden in de 2e kolom lopen altijd op.
Nu wil ik voor elk jaar zoiets doen:
- selecteer de 1e datum in het jaar; en de laatste datum in het jaar.
- Trek de twee data-waarden van elkaar af (21-5=16). Trek de twee datums van elkaar af (20 dec 2008 - 6 jan 2008).
En dan kan ik die waarden gebruiken om het verbruik in 2008 te berekenen.

Dus de vraag is: Hoe vind ik de 1e en de laatste datum van een jaar in zo'n lijst?
Dit probleem heb ik bij de vorige Excel-vragen topic ook al behandeld.
Het gaat erom dat je (via lineaire interpolatie) de meterstand kunt bepalen van 1-1-2009 0:00 uur bv dmv de standen vlak voor en vlak na het bewuste tijdstip. Hierdoor kun je het verbruik van iedere maand of ieder jaar bepalen.
Ik zal het weer even copy pasten:
Zet in A1: Peilnummer
Zet in A2 t/m A1001: 1 t/m 1000 (of meer)
Copieer kolom A naar kolom D
2 dezelfde kolommen (nodig omdat vert.zoeken alleen naar rechts kan)
Zet in B1: Peiltijdstip
Zet in C1: Meterstand
Zet in B2 bijvoorbeeld: 7-11-2009 16:35
C2 wordt: 17181
B3 wordt: 9-11-2009 20:22
C3 wordt 17293
B4 wordt 10-11-2009 21:33
C4 wordt 17389
B5 wordt 29-11-2009 17:28
C5 wordt 19141
Kolommen B en C worden dus resp. de peilmomenten en de bijbehorende meterstanden.

Ga naar blad 2
Zet in A1: Tijdstip
Zet in A2: 9-11-2009 0:00
Zet in A3: 10-11-2009 0:00
Trek door naar beneden
Zet in B1: peilnummer voor
Zet in B2: =VERT.ZOEKEN(A2;Blad1!B:D;3)
Eén van de weinige keren dat er géén "onwaar" moet worden geplaatst)
Zet in c1: peilmoment voor
Zet in C2: =VERT.ZOEKEN(B2;Blad1!A:B;2;ONWAAR)
Zet in d1: peilmoment na
Zet in d2: =VERT.ZOEKEN(B2+1;Blad1!A:B;2;ONWAAR)
Zet in e1: meterstand voor
Zet in e2: =VERT.ZOEKEN(B2;Blad1!A:C;3;ONWAAR)
Zet in f1: meterstand na
Zet in f2: =VERT.ZOEKEN(B2+1;Blad1!A:C;3;ONWAAR)
Zet in g1: meterstand tijdstip
Zet in g2: =(A2-C2)/(D2-C2)*(F2-E2)+E2
Copieer dit allemaal naar beneden
Nu zijn via lineaire interpolatie (geen intrapollatie, zoals ik eerder zei) de meterstanden per "tijdstip" bepaald.

Ga naar blad 3
Zet in A1: datum
Zet in A2: 9-11-2009
Zet in A3: 10-11-2009
en zo voort
Zet in B1: Verbruik
Zet in B2: =+Blad2!G3-Blad2!G2
Copieer verder
En je ziet het verbruik per dag.
Dit kan natuurlijk ook per maand of per dag

[ Bericht 0% gewijzigd door Twentsche_Ros op 03-12-2009 18:40:14 ]
Je kunt beter één kaars opsteken dan duizend maal de duisternis vervloeken.
  vrijdag 4 december 2009 @ 16:01:57 #63
158136 Joooo-pi
Do you want a balloon...
pi_75286648
Als ik in excel een besturingselement toevoeg (checkbox) dan valt aan de onderkant altijd een stukje van de letter weg. Hebben jullie dat ook?



(de derde letter is een J en lijkt nu op een I.)

Groter maken helpt niet, zoals je kunt zien en een ander lettertype (Times new roman) helpt ook niet.

Iemand een idee?
heitieh
  vrijdag 4 december 2009 @ 21:44:49 #64
259770 iamcj
Niets is onmogelijk
pi_75299143
Lettertypegroote 8 of 9 kiezen.
Wie bang is voor morgen, kan niet genieten van vandaag.
Religie is als taal, een basisbehoefte voor een maatschappij, iedereen spreekt zijn eigen dialect en even verder op begrijp je niet meer wat de ander zegt.
  vrijdag 4 december 2009 @ 21:54:03 #65
259770 iamcj
Niets is onmogelijk
pi_75299541
quote:
Op woensdag 2 december 2009 21:46 schreef mien-moeke het volgende:

[..]

Vind t een hele mooie formule maar snap niet wat ie doet.
Kun je m stap voor stap proberen uit te leggen?
Belangrijk dus: cel verlaten met ctr + shift + enter, dan krijg je ook die extra haken er omheen.{}

=GEMIDDELDE(ALS($A$18:$A$33>C23;ALS($A$18:$A$33<C24;$B$18:$B$33;0);0))


$A$18:$A$33 = datumbereik
$B$18:$B$33 = waardenbereik
C24 = einddatum
C23 = begindatum

ALS($A$18:$A$33<C24;$B$18:$B$33;0)

Deze ALS geeft alle cellen in kolom B door waarvan de datum in kolom A < C24

De ALS staat weer in een andere ALS genest. Deze ALS neemt de waarden van de eerste ALS en doet een tweede toets. Alle data in kolom A moeten groter zijn dan de datum in C23.

De waarden die over zijn wordt het gemiddelde van berekend.

[ Bericht 0% gewijzigd door iamcj op 04-12-2009 22:01:36 ]
Wie bang is voor morgen, kan niet genieten van vandaag.
Religie is als taal, een basisbehoefte voor een maatschappij, iedereen spreekt zijn eigen dialect en even verder op begrijp je niet meer wat de ander zegt.
  vrijdag 4 december 2009 @ 22:00:55 #66
259770 iamcj
Niets is onmogelijk
pi_75299806
quote:
Op woensdag 2 december 2009 21:29 schreef mgerben het volgende:

[..]

Leuk, ik ben ook naar dit op zoek.
Verheldering.
Ik heb een lijst met datums die over verschillende jaren heen lopen.
Wat ik wil is een selectie die de 1e en laatste datum in een jaar kan vinden (en dan iets kan doen met de data erbij).
Voorbeeld:
06-01-2008 5
02-09-2008 11
20-12-2008 21
01-01-2009 26
30-11-2008 32

Die waarden in de 2e kolom lopen altijd op.
Nu wil ik voor elk jaar zoiets doen:
- selecteer de 1e datum in het jaar; en de laatste datum in het jaar.
- Trek de twee data-waarden van elkaar af (21-5=16). Trek de twee datums van elkaar af (20 dec 2008 - 6 jan 2008).
En dan kan ik die waarden gebruiken om het verbruik in 2008 te berekenen.

Dus de vraag is: Hoe vind ik de 1e en de laatste datum van een jaar in zo'n lijst?
En hier een voorbeeld van een max functie ook weer met matrix. Matrix wil niets anders zeggen dan voer de actie uit voor meer dan 1 cel. Probeer de Help eens.

=MAX(ALS(E6:E24>D15;F6:F24;0))

Verlaten met Ctr+Shift +Enter geeft de haken.

De bereiken zijn gewoon voorbeelden.
Wie bang is voor morgen, kan niet genieten van vandaag.
Religie is als taal, een basisbehoefte voor een maatschappij, iedereen spreekt zijn eigen dialect en even verder op begrijp je niet meer wat de ander zegt.
  zondag 6 december 2009 @ 08:56:13 #67
1055 Schanulleke
Een kop vol zaagsel!
pi_75331631
Even een hele eenvoudige vraag:

Ik heb een enquête die op iedere vraag maar twee antwoordmogelijkheden heeft: waar of niet waar.
Nu heb ik die in Excel ingevoerd.
Van links naar rechts heb ik het aantal vragen staan, daaronder staat per respondent waar of niet waar.
Nu wil ik graag staafdiagrammetjes maken waar per vraag is gesplitst hoe vaak er waar en niet waar is gestemd.
Alleen, dat lukt me dus niet zo 1,2,3.

Wie biedt de oplossing?
Life is what you make it.
  zondag 6 december 2009 @ 11:24:19 #68
62215 qu63
..de tijd drinkt..
pi_75332786
Kolom B selecteren (als daar de eerste vraag staat natuurlijk ) en dan grafieken aanklikken al geprobeerd? En hoe staan de antwoorden vermeld, waar/niet waar of 1/0?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75333776
Beste excel experts, Ik ben een zeer basic excel gebruiker en heb het volgende nodig:

In een bepaalde cel wil ik een startwaarde invoeren, waarna er elke week (op zondag) automatisch een bepaald bedrag bijkomt. Is dit mogelijk?
Eigenlijk is het nog fijner om de standaardformule te weten zodat ik het voor meer dingen kan gebruiken.
Ik wil namelijk wat minder handmatig mijn leef/kostenpatroon kunnen bijhouden.

Dankuwel!
  zondag 6 december 2009 @ 12:28:06 #70
1055 Schanulleke
Een kop vol zaagsel!
pi_75333845
antwoorden staan vermeld als waar of niet waar.
Als ik de kolom selecteer en op grafieken klik dan krijg ik per respondent een staaf.
Dat is niet de bedoeling.
Ik wil uiteindelijk per vraag twee staven hebben, een voor het aantal waar en een voor het aantal niet waar.
Moet ik misschien eerst in kaart brengen hoeveel waar/niet-waar er per vraag is en daar een staafdiagram van trekken? Het oogt minder mooi denk ik maar werken met numerieke waardes lijkt wel voordeel te bieden.
Life is what you make it.
  zondag 6 december 2009 @ 14:07:22 #71
62215 qu63
..de tijd drinkt..
pi_75336443
quote:
Op zondag 6 december 2009 12:28 schreef Schanulleke het volgende:
antwoorden staan vermeld als waar of niet waar.
Als ik de kolom selecteer en op grafieken klik dan krijg ik per respondent een staaf.
Dat is niet de bedoeling.
Ik wil uiteindelijk per vraag twee staven hebben, een voor het aantal waar en een voor het aantal niet waar.
Moet ik misschien eerst in kaart brengen hoeveel waar/niet-waar er per vraag is en daar een staafdiagram van trekken? Het oogt minder mooi denk ik maar werken met numerieke waardes lijkt wel voordeel te bieden.
Je kan onderaan de kolom ook aantal.als(B2: B30;"Waar") en aantal.als(B2: B30;"Niet waar") neerzetten. Dan krijg je gewoon 2 cijfers onderaan, en daar kan je dan weer een grafiek van maken.
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  zondag 6 december 2009 @ 14:11:26 #72
62215 qu63
..de tijd drinkt..
pi_75336552
quote:
Op zondag 6 december 2009 12:23 schreef FrituurVetPet het volgende:
Beste excel experts, Ik ben een zeer basic excel gebruiker en heb het volgende nodig:

In een bepaalde cel wil ik een startwaarde invoeren, waarna er elke week (op zondag) automatisch een bepaald bedrag bijkomt. Is dit mogelijk?
Eigenlijk is het nog fijner om de standaardformule te weten zodat ik het voor meer dingen kan gebruiken.
Ik wil namelijk wat minder handmatig mijn leef/kostenpatroon kunnen bijhouden.

Dankuwel!
Dat kan, maar je kan ook een kant en klaar bestand van microsoft.com pakken:
http://office.microsoft.c(...)oryID=CT101172321043
http://office.microsoft.c(...)oryID=CT101172321043

http://office.microsoft.com/nl-nl/templates/CT101172321043.aspx
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75337528
quote:
Dat bedoel ik helaas niet.

Wat ik bedoel is bijvoorbeeld met mijn telefoonrekening.
Stel dat ik tot nu toe 500 euro telefoonkosten heb gehad, en daar elke week 10 bijkomt.

Kan ik dan een formule invoeren waarbij de beginwaarde 500 is, en er vanaf nu elke week 10 bijkomt, op zondag?
  zondag 6 december 2009 @ 16:26:14 #74
1055 Schanulleke
Een kop vol zaagsel!
pi_75340072
quote:
Op zondag 6 december 2009 14:07 schreef qu63 het volgende:

[..]

Je kan onderaan de kolom ook aantal.als(B2: B30;"Waar") en aantal.als(B2: B30;"Niet waar") neerzetten. Dan krijg je gewoon 2 cijfers onderaan, en daar kan je dan weer een grafiek van maken.
Dank je, dat is de meest elegante oplossing.
Life is what you make it.
  zondag 6 december 2009 @ 16:58:46 #75
62215 qu63
..de tijd drinkt..
pi_75341046
quote:
Op zondag 6 december 2009 14:44 schreef FrituurVetPet het volgende:

[..]

Dat bedoel ik helaas niet.

Wat ik bedoel is bijvoorbeeld met mijn telefoonrekening.
Stel dat ik tot nu toe 500 euro telefoonkosten heb gehad, en daar elke week 10 bijkomt.

Kan ik dan een formule invoeren waarbij de beginwaarde 500 is, en er vanaf nu elke week 10 bijkomt, op zondag?
Dat kan.
500 + (begindatum)-(datum van vandaag)/7, afronden op hele getallen en dat maal 10 doen.

Of wil je die 10 euro iedere keer op een nieuwe regel hebben?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75341167
quote:
Op zondag 6 december 2009 16:58 schreef qu63 het volgende:

[..]

Dat kan.
500 + (begindatum)-(datum van vandaag)/7, afronden op hele getallen en dat maal 10 doen.

Of wil je die 10 euro iedere keer op een nieuwe regel hebben?
Nee dit is PRIMA!
Is er wel een mogelijkheid om 'datum van vandaag' in te voeren zodat ik niet elke keer bij updaten dat zelf hoef te doen, maar dat hij dat dus zelf uit de kalender haalt o.i.d.?
Even uitproberen of ik het voor elkaar krijg.
pi_75341333
als je in een cel de volgende formule typt: =DATUM() staat in die cel altijd de datum van vandaag.
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_75341548
quote:
Op zondag 6 december 2009 17:07 schreef Deetch het volgende:
als je in een cel de volgende formule typt: =DATUM() staat in die cel altijd de datum van vandaag.
Letterlijk vertalen naar het engels werkte niet, maar =today wel.

Het is nu opgelost dus ik kan verder bouwen aan mijn excell. Dank aan beiden voor de input
  maandag 7 december 2009 @ 11:38:14 #79
47711 Harmvt
Bubblemaker
pi_75364877
Nooit geweten dat er zo'n levendige Excel-community op Fok! bestond.. leuk! Misschien kan 1 van jullie mij ook enigszins op weg helpen.
Ik werk met de Nederlandse versie, 2003. Wat niveau betreft zit ik met Excel denk ik iets hoger dan de basisbeginselen. Ik kan bijvoorbeeld aardig overweg met Draaitabellen en Verticaal zoeken, maar van Macro’s etc heb ik nog geen kaas gegeten.

Ik zit met het volgende: Ik wil voor mijn stage (bij een grote autodealer met 6 vestigingen) de managementrapportages overzichtelijker en makkelijker in gebruik maken.
Om te beginnen wil ik de totalen van 6 verschillende Excel bestanden overzichtelijk weergeven in 1 Excel bestand. Deze 6 bestanden worden dagelijks automatisch aangeleverd en bestaan uit 1 tabblad met een paar honderd regels die zijn voorzien van een regelcode. De bestandsnaam van de 6 automatisch gegenereerde bestanden is iedere dag anders (naar datum).

Hoe krijg ik Excel nu zo ver, dat hij met 1 druk op de knop de totalen per regelcode uit de andere bestanden haalt en deze importeert? Moet ik dan met Macro’s gaan werken? En zo ja, wat is dan een goede manier om mijzelf dit eigen te maken?

Alvast bedankt!
pi_75370101
Als de totalen per regelcode altijd op dezelfde plek staan en de bestanden zelf ook altijd in dezelfde map staan zou je met INDIRECT al een heel eind moeten komen. Dan heb je dus geen macro's nodig.

Andere bestanden open je met: Workbooks.Open Filename:= "variabele die de filelokatie+naam bevat"

Oh ja, als je meer informatie geeft zoals soort bestand waar de gegevens in staan, opbouw van het bestand, lokatie van het bestand etc etc dan kan je ook een wat gedetailleerder antwoord verwachten.
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_75370123
quote:
Op zondag 6 december 2009 17:15 schreef FrituurVetPet het volgende:

[..]

Letterlijk vertalen naar het engels werkte niet, maar =today wel.

Het is nu opgelost dus ik kan verder bouwen aan mijn excell. Dank aan beiden voor de input
oh ja dat was ook zo DATE is voor in visual basic
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
  maandag 7 december 2009 @ 15:29:57 #82
47711 Harmvt
Bubblemaker
pi_75373831
Bedankt voor je reactie!
Ik heb zelf nog wat verder gezocht, en blijkbaar moet ik me dus gaan verdiepen in VBA. Maar hoe begin je daar aan? Iemand een tip om jezelf dat een beetje snel (en gratis) eigen te maken? Ik heb wel enige ervaring met programmeren in Q(uick)Basic van vroegah...
quote:
Op maandag 7 december 2009 13:55 schreef Deetch het volgende:
Oh ja, als je meer informatie geeft zoals soort bestand waar de gegevens in staan, opbouw van het bestand, lokatie van het bestand etc etc dan kan je ook een wat gedetailleerder antwoord verwachten.
De bestanden waar ik het in eerste instantie over had kan ik niet posten, maar ik heb wel een ander vergelijkbaar voorbeeld. Dit bestand ontvang ik wekelijks. Ik heb om privacy redenen een aantal kolommen verwijdert. Bestand op SkyDrive Het bestand heeft iedere week een iets andere benaming, gezien de datum op het einde, maar zal op een vaste locatie worden opgeslagen.

Hiervan zou ik ook graag een werkmap maken waar de totalen van die week met een druk op de knop worden toegevoegd. Die totalen moeten worden onderverdeeld in de verschillende vestigingen (blauw, elke vestiging een eigen werkblad). En dan per regelcode (groen) het totaal bedrag (oranje).

Is de verwachting dat ik dit met wat basiskennis van VBA zelf kan maken reëel, of komt hier te veel bij kijken?

[ Bericht 2% gewijzigd door Harmvt op 07-12-2009 15:58:32 ]
pi_75374303
Denk dat het wel lastig is, maar als je QB hebt gehad kom je een eind!
Ik heb ooit s een goed boek gehad, Sam on VBA oid?
  maandag 7 december 2009 @ 15:54:21 #84
62215 qu63
..de tijd drinkt..
pi_75374988
VBA is toch niet per se nodig?

Als het altijd bestandsnaamWEEKNUMMER.xls is en de cel die gelezen moet worden altijd D45 is (bijvoorbeeld) kan je dat toch ook met de standaard excel-functies maken?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75376116
quote:
Om te beginnen wil ik de totalen van 6 verschillende Excel bestanden overzichtelijk weergeven in 1 Excel bestand. Deze 6 bestanden worden dagelijks automatisch aangeleverd en bestaan uit 1 tabblad met een paar honderd regels die zijn voorzien van een regelcode. De bestandsnaam van de 6 automatisch gegenereerde bestanden is iedere dag anders (naar datum).

Hoe krijg ik Excel nu zo ver, dat hij met 1 druk op de knop de totalen per regelcode uit de andere bestanden haalt en deze importeert? Moet ik dan met Macro’s gaan werken? En zo ja, wat is dan een goede manier om mijzelf dit eigen te maken?
Hij zou met VBA door een map kunnen loopen en elk bestand uitlezen.
Als jij 6 bladen hebt met 30 kolommen is het kutwerk om elke keer die formules aan te passen.

Maar ik ben zelf al niet zo'n fan van dit soort dingen bouwen, dus ik begin er niet aan
  maandag 7 december 2009 @ 16:30:25 #86
47711 Harmvt
Bubblemaker
pi_75376556
quote:
Op maandag 7 december 2009 15:54 schreef qu63 het volgende:
en de cel die gelezen moet worden altijd D45 is (bijvoorbeeld) kan je dat toch ook met de standaard excel-functies maken?
Dat is helaas niet het geval, kijk maar eens naar het bestand dat ik heb geupload.
  maandag 7 december 2009 @ 16:35:42 #87
47711 Harmvt
Bubblemaker
pi_75376759
DaFan: Dat boek wat je noemde kan ik zo snel niet vinden, was dat de precieze titel?
pi_75377727
Iets van
Sams teach yourself Visual Basic.

Was toen zo'n e-book wat ik ergens vandaan had.
pi_75401301
Even een paar beginnetjes:

Ten eerste moeten alle benodigde bestanden geopend worden. Hiervoor maak je een klein macrotje.
Je start macro opnemen, opent de benodigde bestanden en kijkt hoe de code eruit ziet (Alt+F11)

Nu zie je als het goed is:
1
2
3
4
5
sub bladedibla()

code om files te openen

end sub


Om een datum in te voeren die je vervolgens aan je bestandnaamplakt voeg je een inputbox toe:
Dit doe je voor de code van het openen van de bestanden
1
2
3
4
5
datum = Inputbox("Geef datum bestanden (ddmmjj)"
vervolgens maak je zes variabelen
file1 = "standaardnaam van bestand1" & datum & ".xls"
file2 = ""standaardnaam van bestand2" & datum & ".xls"
*** idem voor file3, file4, file5, file 6


vervolgens vervang je in de code voor het openen van bestanden elke keer de uitgeschreven filenaam door de variable file1, file2 etc etc

Nu testen en als het niet werkt of je er niet komt komt horen we het wel.

Vervolgens kun je in de geopende bestanden verticaal zoeken

In je verzamelsheet typ je in een cel (format als tekst) de datum zoals deze ook in de bronbestanden staat.

Vervolgens ga je verticaal zoeken maar gebruik je om de zoekrange aan te geven de functie INDIRECT.

1
2
3
4
5
6
=VLOOKUP("test",[Book1]Sheet1!$A$1:$B$8,2,FALSE)
**** formule zoekt naar "test" in het bestand [Book1], sheet1

In cel C1 staat nu: [Book1]Sheet1!$A$1:$B$8
=VLOOKUP("test",INDIRECT(C1),2,FALSE)
**** heeft hetzelfde resultaat als voorgaande


Cel C1 kun je zelf samenvoegen door een combinatie van een tekststring en een andere cel (waar je datum in staat (bijv cel b1).

Voorbeeld. In B1 zet je 1
in C1 zet je dan als voorbeeld: ="[Book"&B1&"]Sheet1!$A$1:$B$8"
De formule =VLOOKUP("test",INDIRECT(C1),2,FALSE) geeft weer hetzelfde resultaat
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_75402009
Uit: heleboel labels in VBA leegmaken. (naam + #)
quote:
Op dinsdag 8 december 2009 10:41 schreef Holy_Goat het volgende:
Hoi,

ik heb een stuk of 30 labels in een form (VBA, excel 2003),
met de naam label1 - label30. Arrays kunnen niet gemaakt worden in vba zover ik begrepen heb.
Is er nu wel een snelle manier om lbl 1-30 leeg te maken zonder 30 lines te hoeven typen?

HG
1
2
3
4
For i = 1 To 30
   sName = "label" & i
   Me.Controls(sName).Text = ""
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
  dinsdag 8 december 2009 @ 16:07:03 #91
47711 Harmvt
Bubblemaker
pi_75412461
quote:
Op dinsdag 8 december 2009 10:36 schreef Deetch het volgende:
Even een paar beginnetjes:
Allereerst bedankt voor je hulp Deetch!

Het eerste deel is me aardig gelukt. Ik probeer nu eerst om het werkend te krijgen met het andere bestand dat ik als voorbeeld gaf.
Mijn code ziet er nu dus zo uit:
1
2
3
4
5
6
7
Sub Eerste_test()
datum = InputBox("Geef datum in te voeren bestand:(ddmmjj)")
FILE1 = "114_Q5_InterneRegelsWeek_excel_" & datum & "_H114.xls"
    ChDir "B:\P&O\H*******\Temp"
    Workbooks.Open Filename:=FILE1
    Windows("Map1").Activate
End Sub


Het bestand waarvan ik de datum opgeef wordt dan geopend. Maar is het is het perse nodig dat de betreffende bestanden fysiek geopend worden? Mijn doel is om het eindresultaat dummy-proof te maken en dan werkt het niet mee dat er 6 bestanden open springen.

Maar nu het laatste stuk van de code die je poste... daar loop ik helemaal vast (Ik gebruik hier trouwens ook de NL versie (2003) dus misschien dat er mee te maken heeft).
Excel blijft mijn vert.zoeken formule incorrect vinden. Kan ik trouwens wel gebruik maken van vert.zoeken? Als je naar het bestand kijkt dat ik heb bijgevoegd, hebben heel veel regels dezelfde datum.

Voor de duidelijkheid: Ik zou graag willen dat alle regels van alle bestanden in die map aan de verzamelsheet worden toegevoegd. De regels uit het wekelijkse nieuwe bestand moeten met de klik op knop onderaan komen.

Of zijn dit allemaal een beetje te hoog gegrepen ambities voor een VBA-N00b

[ Bericht 3% gewijzigd door Harmvt op 08-12-2009 16:13:14 ]
pi_75414326
Om te verticaal zoeken moeten de bestanden open staan. met vert.zoeken kun je idd maar een cel van 1 datum opzoeken.

Je wilt dus alle regels van een bepaalde datum toevoegen aan je overzichtssheet?
Of wil je alle regels van alle 6 sheets samenvoegen, zeg maar de zes sheets verzamelen tot 1 sheet?
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_75434949
Ok, vergeet even die 6 bestanden. Het eerste dat ik wil bewerkstelligen is om de gegevens uit dat bestand dat ik in bovenstaande posts heb geupload te verzamelen in 1 verzamelsheet. Dat met die 6 bestanden lijkt er erg op, maar is de volgende stap.
Bovengenoemd bestand krijg ik wekelijks toegestuurd en ik wil gewoon dat alle gegevens toegevoegd worden aan 1 verzamelsheet, zodat ik er vervolgens grafieken etc op los kan laten om trends te ontdekken.
Handmatig kopiëren en plakken zou het meest voor de hand liggend zijn, maar ik wil dit trucje dus voor nog meer doeleinden gaan gebruiken. Zoals dat met die 6 bestanden. Dit alles moet ook nog eens fool-proof zijn voor de mensen die er mee gaan werken.
  woensdag 9 december 2009 @ 09:30:19 #94
73305 Stpan
Zullen wij laten hoo-ooren...
pi_75435530
Excel2007 Engels

Ik heb het volgende.
Een lange lijst van nummers die allemaal 5-cijferig dienen te worden.
Via =IF(LEN(A1)=1;"0000"&A1 etc. is het niet moeilijk om te kortere nummers langer te maken.

Nu heeft iemand ook heel handig een aantal 6-cijferige referentienummers aan de data toegevoegd. Die beginnen allemaal met 900xxx. Dus bijv 900111. Dit moet worden 90111.

Ik dacht zelf iets in de trend van CONCATENATE en iets met LEFT(A1;1) en RIGHT(A1,4). Maar volgens mij kan ik formules niet concatenaten, het lukt mij iig niet.... Iemand een idee?
pi_75435610
Moet het 2e nummer elke keer wegvallen, of de eerste nul oid?
pi_75435909
CONCATENATE is niet echt nodg hier, een ampersand voldoet:

LEFT(A1;1)&RIGHT(A1;4)

Beetje vreemd trouwens dat je Engels & Nederlandse notatie door elkaar hebt, normaal is Engels met komma's.
  woensdag 9 december 2009 @ 10:09:08 #97
73305 Stpan
Zullen wij laten hoo-ooren...
pi_75436411
Schoot me nu pas te binnen dat ik inderdaad gewoon een & teken ertussen kan plakken Thanks!

En ja die Engelse vs. Nederlandse notatie heeft te maken dat ik Engelse versie draai, maar met de systemen die we hier gebruiken Nederlandse datum en currency values moet gebruiken. Schept nog weleens verwarring.....
  woensdag 9 december 2009 @ 10:57:50 #98
73305 Stpan
Zullen wij laten hoo-ooren...
pi_75437910
Nog een andere vraag dan maar:

Ik gebruik nu Access om een fixed width vast te stellen, fixed number of characters is misschien een betere omschrijving.
Ik moet namelijk alles kunnen exporteren naar een .txt file die een leverancier kan uitlezen.

Bijvoorbeeld als in column B iemand Pietersen van z'n achternaam heet, en de volgende heet N'Gulu Faseko Faso, dan is het namelijk de bedoeling dat column C met voornaam voor alle rijen op exact dezelfde positie begint.

Is zoiets makkelijk te regelen in Excel, dat zou me namelijk een copy paste stap naar Access schelen! Iets via Custom settings van het cell-format? Thanks.

[ Bericht 4% gewijzigd door Stpan op 09-12-2009 11:04:44 ]
pi_75441784
Wil je testen hoe lang iets is of moet er dan nog iets mee gebeuren?
Wat zou de output zijn als Pietersen in B1 staan en in B2 staat N'Gulu Faseko Faso ?
  woensdag 9 december 2009 @ 13:38:00 #100
73305 Stpan
Zullen wij laten hoo-ooren...
pi_75443771
De output zou moeten zijn dat:
Pietersen (+ 71 spaties)
N'Gula Bluka (+ bijv. 68 spaties)

Als ik dan exporteer naar txt dan zullen C1 en C2 en alle andere in kolom C op positie 81 beginnen.
pi_75444507
Ah dus aanvullen tot 80 karakters.

Ik heb het zo gedaan, met een eigen functie:
Ga naar Visual Basic editor (Alt-F11), en voeg een Module toe (rechtermuisknop op je bestandsnaam, Insert -> Module).

Voeg daar deze code toe:
1
2
3
4
5
6
7
8
Function VasteLengte(a As String)

    Dim b As String * 80
    
    b = a
    VasteLengte = b

End Function

Nu kan je dmv VASTELENGTE(string) iets aanvullen tot 80 karakters (spaties aan het einde).

A1 = Pietersen
A2 = VASTELENGTE(A1)
A3 = LEN(A2)

A3 geeft dan waarde 80.
pi_75454173
quote:
Op woensdag 9 december 2009 09:00 schreef Harmvt het volgende:
Ok, vergeet even die 6 bestanden. Het eerste dat ik wil bewerkstelligen is om de gegevens uit dat bestand dat ik in bovenstaande posts heb geupload te verzamelen in 1 verzamelsheet. Dat met die 6 bestanden lijkt er erg op, maar is de volgende stap.
Bovengenoemd bestand krijg ik wekelijks toegestuurd en ik wil gewoon dat alle gegevens toegevoegd worden aan 1 verzamelsheet, zodat ik er vervolgens grafieken etc op los kan laten om trends te ontdekken.
Handmatig kopiëren en plakken zou het meest voor de hand liggend zijn, maar ik wil dit trucje dus voor nog meer doeleinden gaan gebruiken. Zoals dat met die 6 bestanden. Dit alles moet ook nog eens fool-proof zijn voor de mensen die er mee gaan werken.
Onderstaande macro kopieert de regels die voldoen aan je zoekcriterium naar een nieuwe sheet
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
43
44
45
46
47
48
Sub FokTest()
'
' FokTest Macro
'
Dim datum, zoekdatum, bereik As String
Dim startpunt, eindpunt As Integer

datum = InputBox("Geef datum in te voeren bestand:(ddmmjj)")

'plaats hier je bestand open code

zoekdatum = Left(datum, 2) & "/" & Mid(datum, 3, 2) & "/20" & Right(datum, 2)
'zoekdatum is datum waarop in excelsheet gezocht moet worden
zoekdatum = DateValue(zoekdatum) 
'datevalue converteert deze tekst naar een "echte datum"

'open bestand om in te zoeken
    Windows("WORegelInternWeek_091207(1).xls").Activate
    Range("A1").Select

Do While ActiveCell.Value <> zoekdatum
    ActiveCell.Offset(1, 0).Select
Loop
'nu is eerste cel met zoekdatum gevonden

startpunt = ActiveCell.Row

Do Until ActiveCell.Value <> zoekdatum
    ActiveCell.Offset(1, 0).Select
Loop
'nu is laatste cel (eentje verder) met zoekdatum gevonden

eindpunt = ActiveCell.Row - 1
   
Rows(startpunt & ":" & eindpunt).Select
Selection.Copy

Windows("Book2").Activate
'verzamelsheet openen

Range("A10000").Select
Selection.End(xlUp).Select
ActiveCell.Offset(1, 0).Select
'eerste lege regel zoeken vanaf onderen

ActiveSheet.Paste

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
pi_75461068
Ik heb een cel met een formule waar een waarde uit komt.( ) Als de waarde onder de 200 komt moet hij rood worden en erboven groen.

Hoe doe ik dit?
pi_75461930
Waarom zie ik dit topic nu pas? Hoe geniaal is deze reeks?
Ain't nothing to it but to do it.
Greece
  donderdag 10 december 2009 @ 01:15:16 #105
62215 qu63
..de tijd drinkt..
pi_75469504
quote:
Op woensdag 9 december 2009 21:52 schreef Mendeljev het volgende:
Waarom zie ik dit topic nu pas? Hoe geniaal is deze reeks?
érg!
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  donderdag 10 december 2009 @ 01:15:36 #106
62215 qu63
..de tijd drinkt..
pi_75469511
quote:
Op woensdag 9 december 2009 21:32 schreef Cracka-ass het volgende:
Ik heb een cel met een formule waar een waarde uit komt.( ) Als de waarde onder de 200 komt moet hij rood worden en erboven groen.

Hoe doe ik dit?
Voorwaardelijke opmaak. Te vinden in het lint in Excel 2007
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75474460
quote:
Op woensdag 9 december 2009 21:52 schreef Mendeljev het volgende:
Waarom zie ik dit topic nu pas? Hoe geniaal is deze reeks?
Dit is de Fokking meest geniale reeks ever. Hij is zo fokking geniaal dat deze fokking geniale reeks opgenomen is in het guinessbook of records als meest fokking geniale reeks ever.
Verder heerst deze reeks zodanig omdat er alleen echte bazen in rondwaren.
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
  donderdag 10 december 2009 @ 11:04:30 #108
73305 Stpan
Zullen wij laten hoo-ooren...
pi_75475463
quote:
Op woensdag 9 december 2009 13:57 schreef DaFan het volgende:
Ah dus aanvullen tot 80 karakters.

Ik heb het zo gedaan, met een eigen functie:
Ga naar Visual Basic editor (Alt-F11), en voeg een Module toe (rechtermuisknop op je bestandsnaam, Insert -> Module).

Voeg daar deze code toe:
[ code verwijderd ]

Nu kan je dmv VASTELENGTE(string) iets aanvullen tot 80 karakters (spaties aan het einde).

A1 = Pietersen
A2 = VASTELENGTE(A1)
A3 = LEN(A2)

A3 geeft dan waarde 80.
Thanks, ik ga ernaar kijken. Ik denk dat een tussenstap via Access toch gebruiksvriendelijker is.
pi_75476681
Excel 2003 NL. Ik wil graag in een grafiek met een trendlijn die 2 periodes vooruit loopt, de labels op de X-as toevoegen voor deze extra periodes.

Voorbeeld:


Hier zou ik dus in de grafiek onder de X-as ook Apr en Mei willen hebben.

Al geprobeerd:
- apr en mei in cellen E1 en F1 ingetikt en grafiekgebied uitgebreid -> foutmelding
- de cellen daaronder met nullen gevuld en grafiekgebied uitgebreid -> trendlijn klopt niet meer

Ik kom er niet uit, maar zou denken dat het wel zou moeten kunnen... Iemand een idee? Alvast dank!
pi_75476903
In office 2007 werkt dat wel gewoon door in E1 en F1 apr en may te zetten en de cellen eronder leeg. In 2003 geen idee.
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
  donderdag 10 december 2009 @ 12:00:19 #111
62215 qu63
..de tijd drinkt..
pi_75477281
quote:
Op donderdag 10 december 2009 11:42 schreef Reifendruck het volgende:
Excel 2003 NL. Ik wil graag in een grafiek met een trendlijn die 2 periodes vooruit loopt, de labels op de X-as toevoegen voor deze extra periodes.

Voorbeeld:
[ afbeelding ]

Hier zou ik dus in de grafiek onder de X-as ook Apr en Mei willen hebben.

Al geprobeerd:
- apr en mei in cellen E1 en F1 ingetikt en grafiekgebied uitgebreid -> foutmelding
- de cellen daaronder met nullen gevuld en grafiekgebied uitgebreid -> trendlijn klopt niet meer

Ik kom er niet uit, maar zou denken dat het wel zou moeten kunnen... Iemand een idee? Alvast dank!
En nulwaarden negeren aanvinken?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75478277
quote:
Op donderdag 10 december 2009 11:49 schreef Deetch het volgende:
In office 2007 werkt dat wel gewoon door in E1 en F1 apr en may te zetten en de cellen eronder leeg. In 2003 geen idee.
Hm ja ik merk nu dat als ik van tevoren al apr en mei erbij zet, en dan pas de grafiek genereer (en daarna de trendlijn), dat het wel goed gaat, ook in 2003. Alleen achteraf aanpassen lijkt dus niet te lukken.

Probleem opgelost dus, dank!
pi_75479968
quote:
Op donderdag 10 december 2009 10:30 schreef Deetch het volgende:

[..]

Dit is de Fokking meest geniale reeks ever. Hij is zo fokking geniaal dat deze fokking geniale reeks opgenomen is in het guinessbook of records als meest fokking geniale reeks ever.
Verder heerst deze reeks zodanig omdat er alleen echte bazen in rondwaren.
wtf
pi_75479983
quote:
Op donderdag 10 december 2009 11:04 schreef Stpan het volgende:

[..]

Thanks, ik ga ernaar kijken. Ik denk dat een tussenstap via Access toch gebruiksvriendelijker is.
Denk je dat =VASTELENGTE() niet te snappen is?
  donderdag 10 december 2009 @ 13:33:22 #115
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75480513
Excel 2007, Vista.

Ik heb een tab met enkele gegevens. Deze gegevens moet ik in een ander tabblad hebben. Nu staat in tab 1 een datum, welke in een zin in tab 2 wil kopieeren.

De zin is (bv): Werknemer treedt in dienst van werkgever met ingang van [DATUM UIT TAB 1). De werkzaamheden bestaan uit blablabla.

Iemand een idee?
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75481377
"Werknemer treedt in dienst van werkgever met ingang van " & Blad1!A1 & "De werkzaamheden bestaan uit blablabla.
  donderdag 10 december 2009 @ 14:32:33 #117
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75482571
quote:
Op donderdag 10 december 2009 13:58 schreef DaFan het volgende:
"Werknemer treedt in dienst van werkgever met ingang van " & Blad1!A1 & "De werkzaamheden bestaan uit blablabla.
Als ik hem letterlijk c/p doet hij het niet.
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75482906
moet nog een = voor en de datum moet idd op blad1, cel 1 staan en ook nog een " aan het eind
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
  donderdag 10 december 2009 @ 14:44:28 #119
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75482966
quote:
Op donderdag 10 december 2009 14:42 schreef Deetch het volgende:
moet nog een = voor en de datum moet idd op blad1, cel 1 staan en ook nog een " aan het eind
Of ik moet blad1 vervangen door de echte naam en cel neem ik aan

En wara moet de =? Aan begin van de regel, of voor "?
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75483285
Sorry de datum moet ook nog naar een tekststring vertaald worden.
1="bladibla per " & TEXT(Sheet1!A1,"dd/mm/yyyy") & " meer bladibla"

Sheet1!A1 is de celverwijzing, als je datum ergens anders staat dan alszodanig aanpassen

Indien je NL versie van office gebruikt:
TEXT=TEKST en misschien dat je het format "dd/mm/yyyy" nog naar wens moet aanpassen.
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_75483373
quote:
Op woensdag 9 december 2009 18:19 schreef Deetch het volgende:
Onderstaande macro kopieert de regels die voldoen aan je zoekcriterium naar een nieuwe sheet
[ code verwijderd ]
Alvast bedankt voor de moeite! Ik ga het aankomende maandag proberen!
  donderdag 10 december 2009 @ 14:58:17 #122
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75483473
-edit- te laat
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
  donderdag 10 december 2009 @ 15:01:56 #123
43584 Beregd
absolutely inch perfect
pi_75483629
quote:
Op donderdag 10 december 2009 14:53 schreef Deetch het volgende:
Sorry de datum moet ook nog naar een tekststring vertaald worden.
[ code verwijderd ]

Sheet1!A1 is de celverwijzing, als je datum ergens anders staat dan alszodanig aanpassen

Indien je NL versie van office gebruikt:
TEXT=TEKST en misschien dat je het format "dd/mm/yyyy" nog naar wens moet aanpassen.
Die yyyy hangt zelfs gewoon af van de taal die bij je windows is ingesteld. we werken hier allemaal met een engelse excel, maar doordat windows soms franstalig en soms nederlandstalig staat ingesteld, werkt die code niet steeds. Erg vervelend.
  donderdag 10 december 2009 @ 15:06:49 #124
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75483785
En nog niet...

Ik heb nu:

"Werknemer treedt in dienst van Werkgever in de functie van Uitzendkracht met ingang van " & TEKST(INVOERSCHERM!C12,"dd/mm/jjjj") & "

Het tabblad/bronblad is INVOERSCHERM, en de datum staat in cel C12.

Als ik dit doe wordt C12," automatisch geselecteerd en krijg ik een melding: TEKST(waarde; notatie_tekst)
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75484349
Komma wordt puntkomma, het werkt bij mij.
  donderdag 10 december 2009 @ 15:32:54 #126
65960 sanger
|-|-|-|-|-|-|-|-|-|-|-|-|-|-|
pi_75484648
quote:
Op donderdag 10 december 2009 15:23 schreef DaFan het volgende:
Komma wordt puntkomma, het werkt bij mij.
Tnx all

Puntkomma was het inderdaad, en de spaties weglaten.
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
pi_75526734
2 simpele vragen weer

1 Wat voor macro moet ik aan mijn knop hangen om naar de volgende tab te gaan ? (die rechts ervan dus)

2 Hoe kan ik (makkenlijk) een aantal waardes optellen die op verschillende tabs staan ? (wel in dezelfde cel steeds)
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
pi_75543106
1.
1
2
3
4
5
Private Sub CommandButton1_Click()

Sheets(ActiveSheet.Index + 1).Activate

End Sub


2.
1
2
3
4
5
6
7
8
9
Private Sub CommandButton1_Click()

For i = 1 To Application.Sheets.Count
    a = Sheets( i).Range("A1").Value + a
Next i

Range("B1").Value = a

End Sub


Succes
pi_75552290
Nu heb ik nog een misschien moeilijkere ? vraag.

Kan ik als ik 1 tab heb. Deze heel snel een keer of 70 klonen ? Wil exact dezelfde tab hebben, maar dan bv 70x in een excel doc. Nu moet de naam dus wel logisch oplopend zijn. Dus bv: auto1, auto2. enz.

Kan dat ook ?
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
pi_75554797
Vraagje

heb Excel 2007 en heb allemaal trackingnummers die ik automatisch wil kunnen doorlaten klikken naar de trackingwebsite als ik er op klik.

Met welke functie kan ik dat oplossen?

Ik ben de grootste n00b
  zaterdag 12 december 2009 @ 19:23:18 #131
158136 Joooo-pi
Do you want a balloon...
pi_75556715
quote:
Op zaterdag 12 december 2009 16:55 schreef znarch het volgende:
Nu heb ik nog een misschien moeilijkere ? vraag.

Kan ik als ik 1 tab heb. Deze heel snel een keer of 70 klonen ? Wil exact dezelfde tab hebben, maar dan bv 70x in een excel doc. Nu moet de naam dus wel logisch oplopend zijn. Dus bv: auto1, auto2. enz.

Kan dat ook ?
1
2
3
4
for i = 1 to 70
    Sheets("Blad1").Copy
    ActiveWorkbook.Close savechanges:=True, Filename:="auto"&i
next


[ Bericht 19% gewijzigd door Joooo-pi op 12-12-2009 19:28:33 ]
heitieh
pi_75557357
quote:
Op zaterdag 12 december 2009 19:23 schreef Joooo-pi het volgende:

[..]
[ code verwijderd ]
Werkt perfect. Alleen maakt hij geen 70 tabs aan maar 70 nieuwe excel bestanden
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
pi_75558361
Ghehe jooo-pi nice try :p
tis niet zo lastig, als je de code aanpast lukt het jezelf ook wel.

Ik heb geen pc bij de hand...sorry
  zaterdag 12 december 2009 @ 20:24:49 #134
158136 Joooo-pi
Do you want a balloon...
pi_75558605
quote:
Op zaterdag 12 december 2009 19:45 schreef znarch het volgende:

[..]

Werkt perfect. Alleen maakt hij geen 70 tabs aan maar 70 nieuwe excel bestanden
ik dacht dat je dat wilde
heitieh
  zaterdag 12 december 2009 @ 20:33:07 #135
158136 Joooo-pi
Do you want a balloon...
pi_75558831
dan werkt dit vast beter:

1
2
3
4
For i = 1 To 70
  Sheets("Blad1").Copy After:=Sheets( i )
  Sheets(1 + i).Name = "auto" & i
Next i


[ Bericht 4% gewijzigd door Joooo-pi op 12-12-2009 21:22:47 (next i is beter) ]
heitieh
pi_75559309
Het ligt aan mij denk ik, maar hij maakt er geen 70, maar gewoon 1 kopie aan. Hmm, wat ben ik er ook slecht in
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
pi_75560013
Next i

ipv alleen Next
  zaterdag 12 december 2009 @ 21:22:11 #138
158136 Joooo-pi
Do you want a balloon...
pi_75560425
quote:
Op zaterdag 12 december 2009 20:50 schreef znarch het volgende:
Het ligt aan mij denk ik, maar hij maakt er geen 70, maar gewoon 1 kopie aan. Hmm, wat ben ik er ook slecht in
raar, ik zet em gewoon nog es bij mij in excel en het werkt gewoon.

welke versie gebruik jij? Ik heb 2007 gebruikt hiervoor.
heitieh
pi_75562071
Ik zal wel iets fout gedaan hebben, ik zal morgen eens kijken
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
pi_75564605
quote:
Op zaterdag 12 december 2009 18:20 schreef Poepoog het volgende:
Vraagje

heb Excel 2007 en heb allemaal trackingnummers die ik automatisch wil kunnen doorlaten klikken naar de trackingwebsite als ik er op klik.

Met welke functie kan ik dat oplossen?

Ik ben de grootste n00b
Iemand

Gaat om een URL waarachter automagisch een nummer geplakt moet worden. www.nummerkomthierachter.nl/track.jps[nummer]
  zondag 13 december 2009 @ 11:40:18 #141
158136 Joooo-pi
Do you want a balloon...
pi_75572068
quote:
Op zaterdag 12 december 2009 22:13 schreef znarch het volgende:
Ik zal wel iets fout gedaan hebben, ik zal morgen eens kijken
Dan zou je het heel simpel nog op kunnen lossen. Doe "macro opnemen" en maak een kopie van het werkblad: rechts klikken op de tab en selecteer "blad kopieren of verplaatsen" en vink "kopie maken" aan. Vervolgens klik je rechts op het nieuwe blad en selecteer "Naam wijzigen". Daarna stop je de macro opname en zet je de for loop er omheen.

for i = 1 to 70

<opgenomen macro>

next i

Dat stukje met die naam haal je ff uit mijn vorige post: ="auto" & i

Zo heb ik het ook ff gedaan. Ik weet natuurlijk niet alles uit mijn hoofd

[ Bericht 1% gewijzigd door Joooo-pi op 13-12-2009 11:48:32 ]
heitieh
  zondag 13 december 2009 @ 14:07:22 #142
148823 znarch
ondertitel
pi_75576753
quote:
Op zaterdag 12 december 2009 09:32 schreef DaFan het volgende:
1.
[ code verwijderd ]

2.
[ code verwijderd ]

Succes :s)
Bij 2 bedoelde ik eigenlijk gewoon een formule om te tellen :@ Ik las op internet dat je zo kunt tellen in een aantal tabs (als het om dezelfde cel gaat)

1=SUM(1stetab:laatstetab!A2)


Maar die gaat huilen omdat er in mijn tabnamen spaties staan -O-
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
  maandag 14 december 2009 @ 05:15:34 #143
62215 qu63
..de tijd drinkt..
pi_75602635
quote:
Op zondag 13 december 2009 14:07 schreef znarch het volgende:

[..]

Bij 2 bedoelde ik eigenlijk gewoon een formule om te tellen Ik las op internet dat je zo kunt tellen in een aantal tabs (als het om dezelfde cel gaat)
[ code verwijderd ]

Maar die gaat huilen omdat er in mijn tabnamen spaties staan
heb je een ' om je tabnamen heen gezet?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75613280
quote:
Op maandag 14 december 2009 05:15 schreef qu63 het volgende:

[..]

heb je een ' om je tabnamen heen gezet?
hehe, niet bij nagedacht
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
pi_75614917
Hallo,

ik heb een formuliertje gemaakt met checkboxes en radiobuttons. Nu heeft mijn collega dit getest en hij zegt dat hij de radiobuttons niet kan selecteren. Nu blijkt dat hij in de ontwerpmodus zit. 2 vragen hierover:
1) Als ik een formulier beveilig wordt dan niet afgedwongen dat de ontwerpmodus wordt uitgeschakeld?
2) Wat moet het macroniveau zijn als je Zijn macro's nodig als je de radiobutton gebruikt van de "werkset besturingselementen"?

thx alvast!
  maandag 14 december 2009 @ 16:11:43 #146
231576 -Techno-
De kracht van herhaling
pi_75616312
quote:
Op maandag 14 december 2009 15:28 schreef jakees het volgende:
Hallo,

ik heb een formuliertje gemaakt met checkboxes en radiobuttons. Nu heeft mijn collega dit getest en hij zegt dat hij de radiobuttons niet kan selecteren. Nu blijkt dat hij in de ontwerpmodus zit. 2 vragen hierover:
1) Als ik een formulier beveilig wordt dan niet afgedwongen dat de ontwerpmodus wordt uitgeschakeld?
Volgens mij wel.
quote:
2) Wat moet het macroniveau zijn als je Zijn macro's nodig als je de radiobutton gebruikt van de "werkset besturingselementen"?

thx alvast!
Gemiddeld of laag, bij gemiddeld wordt telkens de vraag gesteld of je de macro wilt uitvoeren. Bij laag krijg je geen vraag.
Maar ik betwijfel of je überhaupt wel vba code hebt gebruikt, alleen een userform met wat besturings elementen doet vrij weinig.
We stoppen niet met spelen omdat we oud worden.... We worden oud omdat we stoppen met spelen.
pi_75617204
Nu heb ik een lastigere vraag.
Ik heb een excelbestand met werk roosters. Hierin staan dus 52 sheets met het rooster per week.

Nu wil ik in een hoofdtabje kunnen zien hoeveel uur er gewerkt is in de huidige week. Iemand hoe zoiets moet werken ?
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
  maandag 14 december 2009 @ 17:15:23 #148
62215 qu63
..de tijd drinkt..
pi_75618535
quote:
Op maandag 14 december 2009 16:38 schreef znarch het volgende:
Nu heb ik een lastigere vraag.
Ik heb een excelbestand met werk roosters. Hierin staan dus 52 sheets met het rooster per week.

Nu wil ik in een hoofdtabje kunnen zien hoeveel uur er gewerkt is in de huidige week. Iemand hoe zoiets moet werken ?
Ik kan wel wat verzinnen, maar het hangt heel erg af van de opbouw van je werkroosters...

Meer info is dus gewenst (hoe meer hoe beter zelfs!)
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75618972
quote:
Op maandag 14 december 2009 17:15 schreef qu63 het volgende:

[..]

Ik kan wel wat verzinnen, maar het hangt heel erg af van de opbouw van je werkroosters...

Meer info is dus gewenst (hoe meer hoe beter zelfs!)
Welke info wil je allemaal hebben ?
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
  maandag 14 december 2009 @ 17:36:51 #150
62215 qu63
..de tijd drinkt..
pi_75619383
quote:
Op maandag 14 december 2009 17:26 schreef znarch het volgende:

[..]

Welke info wil je allemaal hebben ?
Ehm...

Dat hangt dus af van hoe je werkblad is opgemaakt Ik heb een idee hoe het er uit zou kunnen zien, maar het is jouw sheet Dus jij mag vertellen hoe het er uit ziet
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75620523
Het zijn 52x dezelfde tab.

Hier staan namen en werktijden op. Aan de rechterkant heb ik een kolom waar hij telt hoeveel er in totaal gewerkt is die week.

Onderaan telt hij hoeveel iedereen heeft gewerkt die week.

De tabs hebben een logische naam "werkweek 33" "werkweek 34".

In mijn hoofdtab heb ik een cel die de huidige werkweek berekend.

1=INT((E7-DATE(YEAR(E7-WEEKDAY(E7-1)+4);1;3)+WEEKDAY(DATE(YEAR(E7-WEEKDAY(E7-1)+4);1;3))+5)/7)


Dmv een vlookup "weet" excel welke werkweek bij welke tab zou horen.

Nu is de vraag dus, hoe zorg ik ervoor dat ik in mijn hoofdtab, het aantal gewerkte uren uit de tab van de huide werkweek weergeef ? :)
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
  maandag 14 december 2009 @ 19:03:31 #152
283395 HeetBoven
componist van lullige liedjes
pi_75622423
quote:
Op zaterdag 12 december 2009 23:26 schreef Poepoog het volgende:

[..]

Iemand

Gaat om een URL waarachter automagisch een nummer geplakt moet worden. www.nummerkomthierachter.nl/track.jps[nummer]
Hi Poepoog,

Extra kolommetje aanmaken naast je tracking nummer (H kolom = kolom met tracking nummers in onderstaande formule) en je link zonder tracking nummer op een fixed locatie zetten in je sheet ($i$1 hieronder) dan de formule hieronder doorkopieren.

=HYPERLINK($I$1&$H1;$H1)

Succes!

HeetBoven
pi_75625142
quote:
Op maandag 14 december 2009 19:03 schreef HeetBoven het volgende:

[..]

Hi Poepoog,

Extra kolommetje aanmaken naast je tracking nummer (H kolom = kolom met tracking nummers in onderstaande formule) en je link zonder tracking nummer op een fixed locatie zetten in je sheet ($i$1 hieronder) dan de formule hieronder doorkopieren.

=HYPERLINK($I$1&$H1;$H1)

Succes!

HeetBoven

Dank!

Nog een vraagje,

Hoe maak ik een fixed location aan met $i$1?

Echt een n00b dus
  maandag 14 december 2009 @ 20:14:43 #154
283395 HeetBoven
componist van lullige liedjes
pi_75625587
quote:
Op maandag 14 december 2009 20:05 schreef Poepoog het volgende:

[..]

Dank!

Nog een vraagje,

Hoe maak ik een fixed location aan met $i$1?

Echt een n00b dus
Daar zet je gewoon de link van je website neer, of als je het helemaal geintegreerd wil hebben, vervang je $I$1 met "www.nummerkomthierachter.nl/track.jps/" ( " 2x niet vergeten!)
pi_75631835
quote:
Op maandag 14 december 2009 18:11 schreef znarch het volgende:

Nu is de vraag dus, hoe zorg ik ervoor dat ik in mijn hoofdtab, het aantal gewerkte uren uit de tab van de huide werkweek weergeef ?
Stel in A1 staat "Sheet2" (zonder aanhalingstekens).
Stel op mijn Sheet2 in cel A1 staat "toet toet"

Dan geeft de volgende formule in Sheet1, de waarde uit A1 in Sheet2 weer:
=INDIRECT(A1 & "!A1")

Is dat duidelijk dan hoe je een sheetnaam uit een cel kan gebruiken?
pi_75660218
Excel problemen! Wie kan helpen

Ik heb het volgende probleem. In cell A1 t/m A10 heb ik 10 verschillende getallen staan. Vervolgens zijn cell A11 tot en met A20 leeg. Dan komen er in A21 t/m A30 weer 10 getallen. Dit gaat steeds door, en de lijst breidt zich steeds verder uit naar onder (ja ik heb even een macro erin gegooid 8)).

Mijn vraag is nu, hoe kan ik in bijvoorbeeld column D1 tot en met D10 steeds de laatste 10 cells met getallen weergeven die in column A staan? Dus als A41-A50 de laatste zijn van het rijtje, hoe kan ik die dan in D1-D10 krijgen? En dat het telkens update als bijvoorbeeld A61-A70 weer gevuld worden met getallen?

Alvast héél erg bedankt!
  dinsdag 15 december 2009 @ 19:49:09 #157
62215 qu63
..de tijd drinkt..
pi_75662584
Is het mogelijk om Excel de positie in een lijst uit te laten rekenen?

Ik heb 5 getallen naast elkaar staan:
1¤ 264.000,00    ¤ 245.450,00    ¤ 222.000,00    ¤ 216.000,00    ¤ 218.000,00    ¤ 224.000,00 

Nu wil ik dat excel aangeeft dat 264k 1e is en 216k de laatste. (bijvoorbeeld door na iedere cel en extra cel te maken waar het cijfer in kan)
Zoiets dus:
1¤ 264.000,00    1   ¤ 245.450,00    2   ¤ 222.000,00    4   ¤ 216.000,00    6   ¤ 218.000,00    5   ¤ 224.000,00    3


En dan moet het voor bepaalde reeksen ook nog zo zijn dat die waarde omgekeerd kan worden :P
(ene lijstje is bijvoorbeeld aankoopwaarde, andere lijst is bijvoorbeeld restwaarde)

En dan moet het ook nog met ja/nee lijstjes kunnen werken (1 of 0 punten), maar dat is makkelijk op te lossen met een als-functie als het moet :P

Ohja, en het liefst geen macro's...
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  dinsdag 15 december 2009 @ 19:53:40 #158
179598 Deprater
werken fijn, niks doen beter
pi_75665369
staan die getallen allemaal in 1 regel? Dan eerst uitsplitsen naar kolommen. Daarna kun je gewoon van elke cel de kolompositie berekenen.
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_75666035
quote:
Op dinsdag 15 december 2009 18:51 schreef lobzorenzo het volgende:
Excel problemen! Wie kan helpen

Ik heb het volgende probleem. In cell A1 t/m A10 heb ik 10 verschillende getallen staan. Vervolgens zijn cell A11 tot en met A20 leeg. Dan komen er in A21 t/m A30 weer 10 getallen. Dit gaat steeds door, en de lijst breidt zich steeds verder uit naar onder (ja ik heb even een macro erin gegooid 8)).

Mijn vraag is nu, hoe kan ik in bijvoorbeeld column D1 tot en met D10 steeds de laatste 10 cells met getallen weergeven die in column A staan? Dus als A41-A50 de laatste zijn van het rijtje, hoe kan ik die dan in D1-D10 krijgen? En dat het telkens update als bijvoorbeeld A61-A70 weer gevuld worden met getallen?

Alvast héél erg bedankt!
moet je een macrootje maken, ff uit het hoofd.
1
2
3
4
5
6
7
8
9
10
sub fok()

ActiveSheet.Range("a10000").End(xlUp).Select

For i = 1 to 10
j=-1*i
range("D"&i).value = activecell.offset(j,0)
next i 

end sub

Elke keer als je dan wilt updaten kun je die code runnen. Je zou hem ook achter je code van het maken van je rijtje kunnen plakken, ben je in een keer klaar.

Beter nog je zou de code waarmee die 10 cellen worden gevuld ook kunnen grbruiken om de cellen D1 tm D10 te vullen.
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_75667185
quote:
Op maandag 14 december 2009 22:24 schreef DaFan het volgende:

[..]

Stel in A1 staat "Sheet2" (zonder aanhalingstekens).
Stel op mijn Sheet2 in cel A1 staat "toet toet"

Dan geeft de volgende formule in Sheet1, de waarde uit A1 in Sheet2 weer:
=INDIRECT(A1 & "!A1")

Is dat duidelijk dan hoe je een sheetnaam uit een cel kan gebruiken?
Ik snap je Hij werkt alleen niet Ik krijg de ref fout
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
pi_75670742
quote:
Op dinsdag 15 december 2009 21:05 schreef Deetch het volgende:

[..]

moet je een macrootje maken, ff uit het hoofd.
[ code verwijderd ]

Elke keer als je dan wilt updaten kun je die code runnen. Je zou hem ook achter je code van het maken van je rijtje kunnen plakken, ben je in een keer klaar.

Beter nog je zou de code waarmee die 10 cellen worden gevuld ook kunnen grbruiken om de cellen D1 tm D10 te vullen.
Ik heb het geïmplementeerd, en het is een goede oplossing, maar toch is er iets mee. Ik heb hem inderdaad achter de update code gegooid, zodat het mee-update elke 30 seconden. Alleen het hele bestand wordt er gewoon te traag door. Omdat hij meer dan 1000 regels eerst om moet keren en vervolgens de 1e 10 moet pakken (ik neem aan dat het stukje code daarvoor zorgt, maar ik ben niet zo'n expert ). Zou het niet mogelijk zijn te kijken wat de laatst beschreven rij uit kolom A is, en vervolgens de onderste 10 te pakken?

Ik gooi er gewoon maar een suggestie in, geen idee of het helpt
Misschien kun je me verder helpen? Wel bedankt voor de hulp tot zover trouwens, echt goed!
pi_75671239
Hoe ziet je code eruit die de data in eerste instantie schrijft?

Wat mijn code doet is naar cel A10000 gaan dan control+pijltje omhoog zodat ie bij de onderste gevulde cel uitkomt. Wat ie dan doet is van de tien cellen erboven de gegevens in de eerste tien cellen van kolom D zetten.
Misschien kan je de gegevens wel al in een array plaatsen voor je ze uberhaupt aan je werkblad toevoegt, dan kun je die array nog een tweede keer aanroepen om je data in kolom D te plaatsen, ik denk dat dat sneller is.

Waarom moet je elke 30 seconden updaten? Is het een soort van live registratie van een event ofzo?
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_75675378
Kan iemand mij helpen met een formule?
Ik wil graag de waarden selecteren die in drie kolommen tegelijk voorkomen. Het lukt me nu wel in twee stappen via voorwaardelijke opmaak, maar ik zou het liefst een lijstje van de drie-dubbelen netjes in een aparte kolom gepresenteerd krijgen.

Waar ik het voor nodig heb: voor een forum op een torrentsite maak ik graag raadseltjes in een wedstrijd. Daarvoor heb ik van IMDB van zo'n 300 TV-series alle acteurs in excel gezet. Per kolom een serie. Voor de puzzeltjes wil ik weten welke acteurs allemaal in dezelfde drie TV-series hebben meegedaan. Ik kies zelf de drie kolommen uit.

Zo doe ik het nu:


Maar het moet handiger kunnen, alleen ik weet niet hoe.
pi_75676680
loblorenzo:
Als je in A1:A10 (of in A1034:A1044) je 10 waardes hebt staan, geeft de volgende formule in D1:D10 je laatste 10 waarden uit kolom A:

=INDIRECT(ADRES(VERGELIJKEN(9E+307;A:A)-(10-RIJ());1))

Dit werkt alleen als er 10 waarden achter elkaar staan, als er 9 staan bv dan wordt de eerste een 0 omdat de cel 10 rijen boven je laatste waarde leeg is.

Hoop dat je hier wat aan hebt.
pi_75676685
quote:
Op dinsdag 15 december 2009 21:31 schreef znarch het volgende:

[..]

Ik snap je Hij werkt alleen niet Ik krijg de ref fout
Geef je formule eens?
pi_75676837
quote:
Op woensdag 16 december 2009 02:59 schreef Nerobacsi het volgende:
Kan iemand mij helpen met een formule?
Ik wil graag de waarden selecteren die in drie kolommen tegelijk voorkomen. Het lukt me nu wel in twee stappen via voorwaardelijke opmaak, maar ik zou het liefst een lijstje van de drie-dubbelen netjes in een aparte kolom gepresenteerd krijgen.

Waar ik het voor nodig heb: voor een forum op een torrentsite maak ik graag raadseltjes in een wedstrijd. Daarvoor heb ik van IMDB van zo'n 300 TV-series alle acteurs in excel gezet. Per kolom een serie. Voor de puzzeltjes wil ik weten welke acteurs allemaal in dezelfde drie TV-series hebben meegedaan. Ik kies zelf de drie kolommen uit.

Zo doe ik het nu:
[ afbeelding ]

Maar het moet handiger kunnen, alleen ik weet niet hoe.
Dus je geeft de 3 kolommen al aan ergens?
Dus je kijkt niet welke waarden in welke 3 kolommen komen, maar welke waarden in 3 vaste kolommen voorkomen?
pi_75679303
quote:
Op woensdag 16 december 2009 08:25 schreef DaFan het volgende:

[..]

Dus je geeft de 3 kolommen al aan ergens?
Dus je kijkt niet welke waarden in welke 3 kolommen komen, maar welke waarden in 3 vaste kolommen voorkomen?
Ja, ik kies willekeurig een drietal kolommen uit om te proberen of en hoeveel acteurs in alle drie daarvan gespeeld hebben. Soms zet ik die kolommen voor het gemak even naast mekaar; ze hoeven niet op alfabet te blijven of zo.
pi_75680365
quote:
Op woensdag 16 december 2009 08:13 schreef DaFan het volgende:
loblorenzo:
Als je in A1:A10 (of in A1034:A1044) je 10 waardes hebt staan, geeft de volgende formule in D1:D10 je laatste 10 waarden uit kolom A:

=INDIRECT(ADRES(VERGELIJKEN(9E+307;A:A)-(10-RIJ());1))

Dit werkt alleen als er 10 waarden achter elkaar staan, als er 9 staan bv dan wordt de eerste een 0 omdat de cel 10 rijen boven je laatste waarde leeg is.

Hoop dat je hier wat aan hebt.
Ik vind het een goed idee, maar dit gaat niet lukken, helaas. Ik heb het geprobeerd, maar het probleem is dat er niet altijd 10 gevulde cellen zijn. Bij minder dan 10 gevulde cellen krijg ik inderdaad 0.

Wel snap ik wat je met het VERGELIJKEN of MATCH gedeelte wilt. Ik heb deze formule gevonden:
=MATCH(9.99999999999999E+307,E:E)
Nu krijg ik de laatste gevulde cell-waarde van rij E. Maar misschien is die formule op een of andere manier aan te passen zodat ik ook nog de 9 cell-waardes erboven krijg?

EDIT: kan ik bijvoorbeeld ook de een-na-laatste waarde vinden? Dan zou ik gewoon daarna nog de twee-na-laatste kunnen pakken etc. Of een formule die alle 9 waarden boven de gevonden laatste 10e waarde kan weergeven?

[ Bericht 26% gewijzigd door lobzorenzo op 16-12-2009 11:25:36 ]
pi_75681982
Denk dat het ook wel anders kan.
Wil je dan alsnog de laatste 10 waardes, dus als er 8 zijn ingevuld, wil je dan ook de laatste 2 van de vorige 10?
pi_75682438
Nero:
Ik heb dit maar dit werkt alleen voor getallen
http://www.mrexcel.com/forum/showthread.php?t=362629

Helemaal uitgewerkt en shit, maar namen doet ie niet
Wel mooie formules (maar snap ze zelf ook niet )

Kijk ik nog even verder.
pi_75682455
maar als je toch een macro hebt die steeds verse getallen toevoegt kun je die toch ook de verse getallen in cellen D1 tm D10 laten schrijven of ben ik nou debiel. Hoe ziet die macro voor je verse getallen eruit, ws. kun je daar door 1 regeltje toe te voegen precies krijgen wat je wilt.
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_75682719
Hm zou dit voor je werken Nero:

Ik heb in A2:C6 een aantal waarden staan, waarvan in alle drie kolommen een bepaalde waarde drie keer voorkomt.

Via Voorwaardelijke opmaak, kies ik A2:C6, vanaf A2, en voer dan in als formule:
=AANTAL.ALS($A$2:$C$6;A2)>2
=COUNTIF($A$2:$C$6,A2)>2)

En dan kies ik een opmaak.
Alles wat nu in alle drie de kolommen voorkomt, wordt gekleurd.

Nadeel hiervan is dat ook als een naam dubbel in de lijst staat, deze wordt gekleurd (dus zeg maar 2x in kolom 1 en 1x in kolom 2, dan kleurt ie).
Maarrrr er staan nooit 2 acteurs in dezelfde kolom toch?

Werkt dat voor je?

Met een macro kan je evt later nog dan de gekleurde cellen zoeken in een kolom en die in een apart deel als output genereren.
pi_75682752
quote:
Op woensdag 16 december 2009 12:01 schreef Deetch het volgende:
maar als je toch een macro hebt die steeds verse getallen toevoegt kun je die toch ook de verse getallen in cellen D1 tm D10 laten schrijven of ben ik nou debiel. Hoe ziet die macro voor je verse getallen eruit, ws. kun je daar door 1 regeltje toe te voegen precies krijgen wat je wilt.
Ik hoop het. Ik heb de macro van internet geplukt, maar dit is 'em:

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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
Public RunWhen As Double
Public Const cRunIntervalSeconds = 30 ' one minute
Public Const cRunWhat = "DoTheImport"  ' the name of the procedure to run

Sub StartTimer()
    RunWhen = Now + TimeSerial(0, 0, cRunIntervalSeconds)
    Application.OnTime EarliestTime:=RunWhen, Procedure:=cRunWhat, _
        Schedule:=True
End Sub


''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' ImportTextFile
' This imports a text file into Excel.
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Public Sub ImportTextFile(FName As String, Sep As String)

Dim RowNdx As Long
Dim ColNdx As Integer
Dim TempVal As Variant
Dim WholeLine As String
Dim Pos As Integer
Dim NextPos As Integer
Dim SaveColNdx As Integer

Application.ScreenUpdating = False
'On Error GoTo EndMacro:

SaveColNdx = 1
RowNdx = 1


Open FName For Input Access Read As #1

While Not EOF(1)
    Line Input #1, WholeLine
    If Right(WholeLine, 1) <> Sep Then
        WholeLine = WholeLine & Sep
    End If
    ColNdx = SaveColNdx
    Pos = 1
    NextPos = InStr(Pos, WholeLine, Sep)
    While NextPos >= 1
        TempVal = Mid(WholeLine, Pos, NextPos - Pos)
        Cells(RowNdx, ColNdx).Value = TempVal
        Pos = NextPos + 1
        ColNdx = ColNdx + 1
        NextPos = InStr(Pos, WholeLine, Sep)
    Wend
    RowNdx = RowNdx + 1
Wend

EndMacro:
On Error GoTo 0
Application.ScreenUpdating = True
Close #1
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' END ImportTextFile
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
End Sub

Sub DoTheImport()
ImportTextFile FName:=textbestand.txt", Sep:=" "

StartTimer  ' Reschedule the procedure

End Sub


Het tekstbestand wordt dus per spatie opgedeeld in cells. De getallen die ik nodig heb staan steeds in A.
Ik vind het ook prima als het hele textbestand meteen bij import wordt omgekeerd. Dat zou zelfs nog mooier zijn Hoop dat het lukt!
pi_75683813
quote:
Op woensdag 16 december 2009 12:08 schreef DaFan het volgende:
Hm zou dit voor je werken Nero:

Ik heb in A2:C6 een aantal waarden staan, waarvan in alle drie kolommen een bepaalde waarde drie keer voorkomt.

Via Voorwaardelijke opmaak, kies ik A2:C6, vanaf A2, en voer dan in als formule:
=AANTAL.ALS($A$2:$C$6;A2)>2
=COUNTIF($A$2:$C$6,A2)>2)

En dan kies ik een opmaak.
Alles wat nu in alle drie de kolommen voorkomt, wordt gekleurd.

Nadeel hiervan is dat ook als een naam dubbel in de lijst staat, deze wordt gekleurd (dus zeg maar 2x in kolom 1 en 1x in kolom 2, dan kleurt ie).
Maarrrr er staan nooit 2 acteurs in dezelfde kolom toch?

Werkt dat voor je?

Met een macro kan je evt later nog dan de gekleurde cellen zoeken in een kolom en die in een apart deel als output genereren.
HET WERKT!!

En er komen inderdaad nooit dubbelen in dezelfde kolom voor, dus dat gaat perfect zo.

Geweldig bedankt voor de (snelle!) hulp!!
  woensdag 16 december 2009 @ 12:52:32 #176
62215 qu63
..de tijd drinkt..
pi_75684280
quote:
Op dinsdag 15 december 2009 20:51 schreef Deetch het volgende:
staan die getallen allemaal in 1 regel? Dan eerst uitsplitsen naar kolommen. Daarna kun je gewoon van elke cel de kolompositie berekenen.
Was die voor mij?

Zo ja, Het staat inderdaad in 6 kolommen naast elkaar, maar hoe kan je dan de kolompositie berekenen?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75684406
quote:
Op woensdag 16 december 2009 12:39 schreef Nerobacsi het volgende:

[..]

HET WERKT!!

En er komen inderdaad nooit dubbelen in dezelfde kolom voor, dus dat gaat perfect zo.

Geweldig bedankt voor de (snelle!) hulp!!
No problemo, succes met je quiz.
pi_75684470
qu63:
=MATCH(MIN(A1:F1),A1:F1,0) geeft de kolom waar de laagste waarde in staat.
Via RANK kan je dus ook de 2e, 3e etc vinden.
pi_75684869
quote:
Op woensdag 16 december 2009 11:50 schreef DaFan het volgende:
Denk dat het ook wel anders kan.
Wil je dan alsnog de laatste 10 waardes, dus als er 8 zijn ingevuld, wil je dan ook de laatste 2 van de vorige 10?

Nee die heb ik niet nodig. Waar denk je aan?
pi_75685650
Het is makkelijker om er 10 weer te geven dan 8 als er maar 8 zijn.
Ik moet er nog wel ff over nadenken...

Beginnen je gegevens wel altijd op een vaste rij, dus altijd een meervoud van 10 + 1 (1, 11, 21 etc)
pi_75685858
quote:
Op woensdag 16 december 2009 13:29 schreef DaFan het volgende:
Het is makkelijker om er 10 weer te geven dan 8 als er maar 8 zijn.
Ik moet er nog wel ff over nadenken...

Beginnen je gegevens wel altijd op een vaste rij, dus altijd een meervoud van 10 + 1 (1, 11, 21 etc)
Nee helaas niet, steeds verschillend hoeveel rijen ertussen zitten.
pi_75686047
voeg onder regel 45
1Cells(RowNdx, ColNdx).Value = TempVal

de volgende regel toe:
1Cells(RowNdx, 4).Value = TempVal

Volgens mij werkt het dan.
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_75686775
quote:
Op woensdag 16 december 2009 13:38 schreef Deetch het volgende:
voeg onder regel 45
[ code verwijderd ]

de volgende regel toe:
[ code verwijderd ]

Volgens mij werkt het dan.
Wat zou dit moeten doen dan? Want volgens mij kopieert ie de 4e kolom, namelijk D, naar kolom 4+1, namelijk E.
Maar misschien komt dat ook wel door mezelf :p

Kun je uitleggen wat het doet?
pi_75687496
is dat wat ie doet of wat je denkt dat ie doet?

Als ik die code goed heb gelezen leest je macro een regel en voegt elke waarde tussen spaties (sep=" ") in een nieuwe regel toe. Wat die nieuwe regel doet is dezelfde data in kolom D op dezelfde rij toevoegen.
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_75688487
Hallo,
even een simpele vraag; wat voor celinstellingen moet je gebruiken om het getaal 030 te kunnen typen? Hij verandert het telkens in 30 of 30,0
  woensdag 16 december 2009 @ 14:38:01 #186
15967 Frollo
You know I am a righteous man
pi_75688505
quote:
Op woensdag 16 december 2009 14:37 schreef GuitarJJ het volgende:
Hallo,
even een simpele vraag; wat voor celinstellingen moet je gebruiken om het getaal 030 te kunnen typen? Hij verandert het telkens in 30 of 30,0
Aangepaste notatie > 000
pi_75688589
quote:
Op woensdag 16 december 2009 14:38 schreef Frollo het volgende:

[..]

Aangepaste notatie > 000
Held
  woensdag 16 december 2009 @ 14:41:39 #188
62215 qu63
..de tijd drinkt..
pi_75688642
quote:
Op woensdag 16 december 2009 14:37 schreef GuitarJJ het volgende:
Hallo,
even een simpele vraag; wat voor celinstellingen moet je gebruiken om het getaal 030 te kunnen typen? Hij verandert het telkens in 30 of 30,0
of begin met een ' (je kan er dan alleen niet meer mee rekenen, maar ik gok dat het om kengetallen gaat)
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75689636
quote:
Op woensdag 16 december 2009 14:11 schreef Deetch het volgende:
is dat wat ie doet of wat je denkt dat ie doet?

Als ik die code goed heb gelezen leest je macro een regel en voegt elke waarde tussen spaties (sep=" ") in een nieuwe regel toe. Wat die nieuwe regel doet is dezelfde data in kolom D op dezelfde rij toevoegen.
Als ik de regel toevoeg aan de macro, dan kopieert ie alle gevulde cellen uit kolom E naar kolom D.
De lege cellen van kolom E worden niet gekopieerd, daar blijft de data die oorspronkelijk in kolom D staat gewoon staan.

Maar wat nu
pi_75689704
quote:
Op woensdag 16 december 2009 14:41 schreef qu63 het volgende:

[..]

of begin met een ' (je kan er dan alleen niet meer mee rekenen, maar ik gok dat het om kengetallen gaat)
Het is een grootboekrekeningnummer waar niet meer gerekend hoeft te worden
  woensdag 16 december 2009 @ 15:57:56 #191
62215 qu63
..de tijd drinkt..
pi_75691787
quote:
Op woensdag 16 december 2009 15:09 schreef GuitarJJ het volgende:

[..]

Het is een grootboekrekeningnummer waar niet meer gerekend hoeft te worden
Dan kan je het ook doen dmv een apostrof (')
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75692722
quote:
Op woensdag 16 december 2009 15:07 schreef lobzorenzo het volgende:

[..]

Als ik de regel toevoeg aan de macro, dan kopieert ie alle gevulde cellen uit kolom E naar kolom D.
De lege cellen van kolom E worden niet gekopieerd, daar blijft de data die oorspronkelijk in kolom D staat gewoon staan.

Maar wat nu
Ik zal mijn vorige code nog eens herschrijven om hem sneller te maken, blijkbaar heb ik jouw gekopieerde macro verkeerd begrepen. Vanavond meer.
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 16 december 2009 @ 18:00:09 #193
283395 HeetBoven
componist van lullige liedjes
pi_75696407
quote:
Op woensdag 16 december 2009 15:57 schreef qu63 het volgende:

[..]

Dan kan je het ook doen dmv een apostrof (')
Of als je wel moet rekenen: je gaat naar celeigenschappen, dan maak je de bij Getal -> aangepast een nieuw type aan dmv onder Type zoveel nullen in te geven als je nodig hebt.
pi_75698080
quote:
Op woensdag 16 december 2009 08:14 schreef DaFan het volgende:

[..]

Geef je formule eens?
ik was niet in staat eerder te reageren, sorry.

Ik gebruik jouw formule:

1=INDIRECT(A1 & "!A1")


In cel A1 staat de naam van de Tab waar hij moet kijken genaamd: 2009 Week 51 (of zoiets) (de cel geeft de huidige week weer).

mijn !A1 (de 2de) staat op !S32, deze cel (op sheet 2009 Week 51) is de waarde die ik wil zien.
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
  woensdag 16 december 2009 @ 18:46:16 #195
62215 qu63
..de tijd drinkt..
pi_75698139
quote:
Op woensdag 16 december 2009 18:00 schreef HeetBoven het volgende:

[..]

Of als je wel moet rekenen: je gaat naar celeigenschappen, dan maak je de bij Getal -> aangepast een nieuw type aan dmv onder Type zoveel nullen in te geven als je nodig hebt.
quote:
Op woensdag 16 december 2009 14:38 schreef Frollo het volgende:

[..]

Aangepaste notatie > 000
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75699272
quote:
Op woensdag 16 december 2009 16:20 schreef Deetch het volgende:

[..]

Ik zal mijn vorige code nog eens herschrijven om hem sneller te maken, blijkbaar heb ik jouw gekopieerde macro verkeerd begrepen. Vanavond meer.
je bent nu al m'n held, of het nou lukt of niet
pi_75699727
quote:
Op woensdag 16 december 2009 18:44 schreef znarch het volgende:

[..]

ik was niet in staat eerder te reageren, sorry.

Ik gebruik jouw formule:
[ code verwijderd ]

In cel A1 staat de naam van de Tab waar hij moet kijken genaamd: 2009 Week 51 (of zoiets) (de cel geeft de huidige week weer).

mijn !A1 (de 2de) staat op !S32, deze cel (op sheet 2009 Week 51) is de waarde die ik wil zien.
je moet even met extra aanhalingstekens werken:

"'" & A1 & "'!A1"
Omdat er spaties instaan dienen er nog aanhalingstekens omheen
pi_75700576
Zo bedoel je ? =INDIRECT("E8" & "!S32")

of waarom die "" voor de & ? in jouw eeste formule staat die & sowieso maar 2x

Trouwens in de formule staan geen spaties he, allen zo:

=INDIRECT("E8" & "!S32")

in cel e8 staat wel een een naam met spaties ja. Al helpt dit ook niet

[ Bericht 38% gewijzigd door znarch op 16-12-2009 20:57:57 ]
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
pi_75707429
Nee je snapt me niet. Er moeten enkele aanhalingstekens om de sheetnaam heen. Dat doe je door daar weer dubbele omheen te zetten, en dan pas de sheetnaam eraan te plakken dmv &.

"'" = dubbel, enkel, dubbel
& A1 = plakt de enkele aan de sheetnaam vast (alleen links)
& "'!A1" = dubbel, enkel etc

Hoop dat het zo duidelijker is
pi_75707936
Jep
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
pi_75717337
quote:
Op woensdag 16 december 2009 22:20 schreef znarch het volgende:
Jep
pi_75722182
quote:
Op woensdag 16 december 2009 19:16 schreef lobzorenzo het volgende:

[..]

je bent nu al m'n held, of het nou lukt of niet :D
Wellicht dat deze code sneller is:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Sub lijstje()

'begin en eindrij zoeken van laatst toegevoegde data
ActiveSheet.Range("a10000").End(xlUp).Select
eindrij = ActiveCell.Row
i = 0
Do While ActiveCell.Offset(-i, 0).Value <> ""
    i = i + 1
Loop
beginrij = eindrij - i + 1
'MsgBox beginrij & ", " & eindrij

'array vullen met waarden
myArray = Range("A" & beginrij & ":" & "A" & eindrij)

'kolom D leegmaken
Range("D:D").Clear

'gegevens uit array plaatsen
For i = 1 To UBound(myArray)
    Range("D" & i).Value = myArray(i, 1)
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
pi_75724313
quote:
Op donderdag 17 december 2009 11:25 schreef Deetch het volgende:

[..]

Wellicht dat deze code sneller is:
[ code verwijderd ]


Ja dat werkt!!! Bedankt! Echt super!
pi_75728386
quote:
Op donderdag 17 december 2009 12:19 schreef lobzorenzo het volgende:

[..]

Ja dat werkt!!! Bedankt! Echt super!
hahaha ik roeleer. Toch geen verloren dag dan zo ingeschneeuwd in Groningen.
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_75729908
Luie donder ga gewoon werken!!
pi_75730708
quote:
Op donderdag 17 december 2009 14:47 schreef DaFan het volgende:
Luie donder ga gewoon werken!!
Ben druk aan het thuiswerken. Wel zo lekker trouwens. Saaie stukken doornemen met Manowar, IRon Maiden enzo op de achtergond \m/ hail and kill \m/
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_75733092
Beste allemaal,

Zojuist heb ik het hele topic doorgelopen maar helaas nog geen antwoord gevonden op mijn vraag... Misschien ook omdat ik niet alles snap wat jullie zeggen:)

Mijn vraag is als volgt:

Als ik in excel rapportcijfers invoer wil ik graag dat deze automatisch punten toegewezen krijgt. Het hoogste rapportcijfer krijgt 10 punten en en het laagste 1 punt. Ook bij een ex aequo moet dit doorgerekend worden.

vb:
9,7 = 10 pt
9 = 9pt
9 = 9pt
8,3 = 7pt

Momenteel sorteer ik alles en voer dan handmatig de punten in maar het zou makkelijker zijn als excel in een nieuwe cel automatisch de punten toewijst. Ook moeten de punten dan verspringen als later een hoger rapportcijfer wordt ingevoerd.

Hoop dat jullie me kunnen helpen!
pi_75735753
stel: al je cijfers staan in cellen B2 tot B50

dan zet je in cellen C2 tm C50 de volgende formule
=(B9-MIN($B$1:$B$50))/(MAX($B$1:$B$50)-MIN($B$1:$B$50))*9+1

Op die manier krijgt het hoogste cijfer 10 punten, het laagste cijfer 1 punt en de rest punten in de gelijke verhouding als de cijfers.
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
  donderdag 17 december 2009 @ 22:37:04 #209
229935 damsco
Internetheld sinds 2008
pi_75749187
Hoe kan ik de inhoud van 1 cel over meerdere cellen horizontaal kopieren zonder dat hij de waarde veranderd.

Ik heb nu: =SOM(Exploitatiebegroting!C11)/12 als formule, maar sleep ik het over meerdere cellen dan veranderd hij de cel C11 in D11 E11 F11 et cetera. Hoe kan ik dit voorkomen zonder het in 20 andere cellen handmatig in te moeten voeren?

bvd

EDIT: het is me gelukt door een koppeling naar één van de cellen te maken.

[ Bericht 10% gewijzigd door damsco op 17-12-2009 22:48:26 ]
  donderdag 17 december 2009 @ 23:59:21 #210
62215 qu63
..de tijd drinkt..
pi_75752130
of c11 vervangen door $c$11.. $ zorgt er voor dat de cellen niet veranderen..
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  vrijdag 18 december 2009 @ 00:49:24 #211
229935 damsco
Internetheld sinds 2008
pi_75753517
quote:
Op donderdag 17 december 2009 23:59 schreef qu63 het volgende:
of c11 vervangen door $c$11.. $ zorgt er voor dat de cellen niet veranderen..
Klopt. Dat had ik ook gedaan. Bedankt
pi_75871263
Uit een ander topic even het volgende ter informatie (misschien heeft iemand anders er nog eens wat aan)
quote:
Op zondag 20 december 2009 14:33 schreef adbeentjes het volgende:
Om maar meteen te beginnen, het volgende probleem:

Ik moet een algoritme (in Excel VBA) schrijven dat berekent hoeveel wisselgeld een kassier moet teruggeven aan een klant. Niet enkel het totaal terug te geven bedrag moet worden afgedrukt, maar het wisselgeld moet worden opgesplitst in de verschillende coupures (bijv. ¤634,33 = 1x500 + 0x200+ 1x100 +0x50 + 1x20 + 2x5+ 2x2+ 0x1+ 0x0,50 + 1x0,20 + 1x0,10 + 0x0,05 + 1x0.02+1x0,01)
Ervan uitgaande: terug te geven bedrag kleiner is dan 1000 euro.

Al wat uurtjes 'gespeeld' met VBA, maar helaas zonder resultaat. Wie helpt?

Ad
Deze werkt. Let ook op de afrondfunctie om rekenfouten te corrigeren. En dat i staat voor ( i ) (zonder spaties.

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
Sub wisselgeld()

Dim check, pay, diff, bedrag As Double
Dim change As String
Dim flappen As Integer

'te betalen = check
'geld gegeven = pay
'diff = wisselgeld (tussengetal)
'bedrag = oorspronkelijk wisselgeld (totaal)
check = Range("B1").Value
pay = Range("B2").Value
diff = pay - check
bedrag = diff

'lijst met coupures
myArray = Array(500, 200, 100, 50, 20, 10, 5, 2, 1, 0.5, 0.2, 0.1, 0.05, 0.02, 0.01)
change = ""

'loop door elke coupure
For i = 0 To 14
'als te geven wisselgeld 0 is dan is loopje klaar
    If diff = 0 Then Exit For
'het aantal coupures van de betreffende waarde bepalen (int maakt er een geheel getal van)
'myArray is het i-de item van de eerder aangemaakte array
    flappen = Int(diff / myArrayi)
'tekstregel maken met het aantalcoupures en het type
    change = change & flappen & "x" & myArrayi & " "
'oevrgebleven bedrag berekenen dat nog gewisseld moet worden, afronden op 2 decimalen om rekenfouten te voorkomen
    diff = Round((diff - flappen * myArrayi), 2)
Next i

'tekst box met te wisselen bedrag en hoe deze te wisselen
MsgBox bedrag & ":-->" & change

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
pi_75881484
Ghe nice!
  maandag 21 december 2009 @ 15:53:28 #214
158136 Joooo-pi
Do you want a balloon...
pi_75883024
quote:
Op maandag 21 december 2009 11:10 schreef Deetch het volgende:
Uit een ander topic even het volgende ter informatie (misschien heeft iemand anders er nog eens wat aan)
[..]

Deze werkt. Let ook op de afrondfunctie om rekenfouten te corrigeren. En dat i staat voor ( i ) (zonder spaties.
[ code verwijderd ]
idd. mooi gemaakt! Zo zou ik het ook ongeveer doen, denk ik.
heitieh
pi_75892625
ik moet vanuit excel een export naar een csv file, alleen klopt de indeling niet. wanneer ik voor csv kies dan komt de uitvoer er zo uit te zien: text1, text2, enz.

het programma dat de csv gaat gebruiken leest het csv bestand als volgt: "text1", "text2", 1, 10, "enz"
dus alles moet gescheiden worden dmv een komma, maar tekst moet tussen aanhalingstekens staan en getallen weer niet.

een voorbeeld van de juiste uitvoer is:
"Address Space.AMS_GYR.Power.134.SDB.MDU.A1.OSB","Trip","No","","Yes",1,"No",,,"","","","","Register", "enz"

nou zag ik op internet wel een vb functie die dit mogelijk maakt, maar dan zet hij alles tussen aanhalingstekens. heeft iemand anders misschien ervaring met zo'n soort probleem?
pi_75915630
dan moet je eerst alle formats vastleggen van de kolommemn vastleggen (dus niet general maar text of number)
Vervolgens gebruik je als basis die VB functie die alles tussen "" zet en voeg je daar een regel aan toe:

if activecell.numberformat = "@" then
code om "" toe te voegen
else end if
end if
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_75916230
quote:
Op dinsdag 22 december 2009 10:30 schreef Deetch het volgende:
dan moet je eerst alle formats vastleggen van de kolommemn vastleggen (dus niet general maar text of number)
Vervolgens gebruik je als basis die VB functie die alles tussen "" zet en voeg je daar een regel aan toe:

if activecell.numberformat = "@" then
code om "" toe te voegen
else end if
end if
wat
pi_75918580
oh ja die kan gewoon weggelaten worden
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_75919327
Is het mogelijk om een formulier in excel te maken dat bij elke print een nummer erbij optelt. Dus stel ik wil 100 dezelfde formulieren maar dan bovenin genummerd van 1 t/m 100.

Ik heb de nederlandse 2007 excel versie.
pi_75963753
ja dan moet je het printen van je formulier met de macro recorder openemen.
1
2
3
4
5
6
sub print100()

for i = 1 to 100
range("H1").value = i
printen van pagina code die je had opgenomen
next i


eerst even testen met 5 opvolgende nummer ofzo (ipv 1 to 100 doe je dan 5)
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_75964810
quote:
Op maandag 21 december 2009 11:10 schreef Deetch het volgende:
Uit een ander topic even het volgende ter informatie (misschien heeft iemand anders er nog eens wat aan)
[..]


Deze werkt. Let ook op de afrondfunctie om rekenfouten te corrigeren. En dat i staat voor ( i ) (zonder spaties.
[ code verwijderd ]


Waarom in VBA?
Je kunt ook rechtstreeks de formules in Excel plaatsen.

Zet in A1: biljetten/munten
Zet in B1: aantal coupures
Zet in C1: blijft over
Zet in C2: Het bedrag, b.v. 634,33
Zet in A3: 500
Zet in A4: 200
etc.
t/m zet in A17: 0,01
Zet in B3: +AFRONDEN.NAAR.BENEDEN(c2/a3;0)
Zet in C3: =AFRONDEN(c2-a3*b3;2)
Copieer B3 en C3 naar beneden.
Klaar
Je kunt beter één kaars opsteken dan duizend maal de duisternis vervloeken.
pi_75965944
klopt helemaal maar de oorspronkelijke vraag was om er een algoritme voor te maken. Dat impliceert het gebruik van een stuk programeercode.
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_75975171
Hallo,

Ik ben bezig met mijn scriptie en heb wat hulp nodig, ben mijn oude wachtwoord bij FOK vergeten dus ben niet nieuw Ik heb iig een probleem met verwijzen. Een voorbeeld:

Vraag 1. Wat is uw gezinssituatie? (dropdown menu: alleenstaand, alleenstaand + kinderen, gehuwd, gehuwd + kinderen, samenwonend, samenwonend + kinderen)

Vraag 2. Wilt u tandheelkundige verzekering voor uw kinderen? Ja / Nee


Nou dat was het voorbeeld. Ik wil als ik kies 'alleenstaand' (dus zonder kinderen) dat er automatisch NEE komt te staan bij vraag 2. Echter ik kan alleen verwijzen dat er 'alleenstaand' komt te staan, en dat is niet het goede antwoord.

Is er hier een oplossing voor?

Met vriendelijke groet,

Roald Reurink
  woensdag 23 december 2009 @ 16:37:37 #224
62215 qu63
..de tijd drinkt..
pi_75975450
Bij de cel voor vraag 2:
=ALS(OF(CELMETANTWOORDVRAAG1="alleenstaand';CELMETANTWOORDVRAAG1="gehuwd");"Nee";"")

Met VBA zou je de cel ook nog kunnen blokkeren denk ik, maar op deze manier vult ie automatisch Nee in als er alleenstaand of gehuwd is ingevuld bij vraag 1, en niets als er van de andere antwoorden gekozen is.
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75979600
quote:
Op woensdag 23 december 2009 16:37 schreef qu63 het volgende:
Bij de cel voor vraag 2:
=ALS(OF(CELMETANTWOORDVRAAG1="alleenstaand';CELMETANTWOORDVRAAG1="gehuwd");"Nee";"")

Met VBA zou je de cel ook nog kunnen blokkeren denk ik, maar op deze manier vult ie automatisch Nee in als er alleenstaand of gehuwd is ingevuld bij vraag 1, en niets als er van de andere antwoorden gekozen is.
Dank voor je snelle respons, maar het lukt niet echt Even een screenshot van het probleem...bij de vraagtekens dus moet 'nee' komen wanneer het gezin geen kinderen heeft. In kolom D zie je de dropdownbox en in kolom F de mogelijkheden voor die dropdownbox.

  woensdag 23 december 2009 @ 19:08:34 #226
62215 qu63
..de tijd drinkt..
pi_75980776
quote:
Op woensdag 23 december 2009 18:39 schreef RoaldReurink het volgende:

[..]

Dank voor je snelle respons, maar het lukt niet echt Even een screenshot van het probleem...bij de vraagtekens dus moet 'nee' komen wanneer het gezin geen kinderen heeft. In kolom D zie je de dropdownbox en in kolom F de mogelijkheden voor die dropdownbox.

[ afbeelding ]
In B3 komt dit:
=ALS(OF(D1="alleenstaand";D1="gehuwd");"Nee";"Ja")
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_75984586
Top! Dat werkt, heel erg bedankt, kan ik weer verder
pi_76141959
Ik vroeg mij af of dit mogelijk is:



De klant kiest bijvoorbeeld 'Man', 'Premieduur 15 jaar, geboren op 12-08-2008 (dus 1 jaar oud), dan wordt er automatisch 'leeftijd 1 MAN' gekozen = 5,00

Het lastige is de geboortedatum dat als ik nu invul 21-02-1986 dat Excel weet dat ik dan 23 ben, en de goede lengte van de premieduur.

Is dit mogelijk? Zou namelijk erg mooi zijn als dat zo is

Gr,
Roald
  maandag 28 december 2009 @ 15:26:55 #229
85514 ralfie
!Yvan eht nioj
pi_76142899
quote:
Op maandag 28 december 2009 15:03 schreef RoaldReurink het volgende:
Ik vroeg mij af of dit mogelijk is:

[ afbeelding ]

De klant kiest bijvoorbeeld 'Man', 'Premieduur 15 jaar, geboren op 12-08-2008 (dus 1 jaar oud), dan wordt er automatisch 'leeftijd 1 MAN' gekozen = 5,00

Het lastige is de geboortedatum dat als ik nu invul 21-02-1986 dat Excel weet dat ik dan 23 ben, en de goede lengte van de premieduur.

Is dit mogelijk? Zou namelijk erg mooi zijn als dat zo is

Gr,
Roald
geen idee wat je nu precies wilt... Je wilt iets laten selecteren op basis van de selectie man of vrouw, of wat?
pi_76143037
Vrouwen kunnen geen 0-4 jaar zijn?
pi_76143167
Je hebt in excel de NOW functie (zal wel NU heten in het Nederlands ofzo, achterlijke vertalingen altijd), die de huidige tijd teruggeeft, als je daar de geboortedatum vanaf haalt krijg je de leeftijd?
  maandag 28 december 2009 @ 15:38:21 #232
43584 Beregd
absolutely inch perfect
pi_76143417
quote:
Op maandag 28 december 2009 15:33 schreef kingjotte het volgende:
Je hebt in excel de NOW functie (zal wel NU heten in het Nederlands ofzo, achterlijke vertalingen altijd), die de huidige tijd teruggeeft, als je daar de geboortedatum vanaf haalt krijg je de leeftijd?
Dan krijg je je leeftijd in dagen, wat niet altijd even handig is om mee te rekenen.

je kunt ook bijvoorbeeld year(now())-year(a1)+(month(now())-month(a1)/12+(day(now())-day(a1))/365 doen
pi_76143957
En dan ROUNDDOWN
pi_76143963
quote:
Op maandag 28 december 2009 15:38 schreef Beregd het volgende:

[..]

Dan krijg je je leeftijd in dagen, wat niet altijd even handig is om mee te rekenen.

je kunt ook bijvoorbeeld year(now())-year(a1)+(month(now())-month(a1)/12+(day(now())-day(a1))/365 doen
dat klopt niet, het moet dit zijn:

=YEAR(NOW())-YEAR(A1)+(MONTH(NOW())-MONTH(A1))/12+(DAY(NOW())-DAY(A1))/365
pi_76144048
Huh doe gewoon =ROUNDDOWN((TODAY()-A1)/365;0)
waar A1 de geboortedatum is. Of ben ik nou gek
  maandag 28 december 2009 @ 15:54:02 #236
43584 Beregd
absolutely inch perfect
pi_76144112
quote:
Op maandag 28 december 2009 15:50 schreef kingjotte het volgende:

[..]

dat klopt niet, het moet dit zijn:

=YEAR(NOW())-YEAR(A1)+(MONTH(NOW())-MONTH(A1))/12+(DAY(NOW())-DAY(A1))/365
dat zei ik toch

en waarom vraag je het dan?
  maandag 28 december 2009 @ 15:57:10 #237
43584 Beregd
absolutely inch perfect
pi_76144258
quote:
Op maandag 28 december 2009 15:52 schreef DaFan het volgende:
Huh doe gewoon =ROUNDDOWN((TODAY()-A1)/365;0)
waar A1 de geboortedatum is. Of ben ik nou gek
ja, als je enkel jaren moet hebben is dat idd het makkelijkste maar soms is het exact nodig.

in excel 2007 is er trouwens een nieuwe excelfunctie die het verschil in data berekent.
pi_76145369
quote:
Op maandag 28 december 2009 15:54 schreef Beregd het volgende:

[..]
dat zei ik toch

en waarom vraag je het dan?
jij: YEAR(NOW())-YEAR(A1)+(MONTH(NOW())-MONTH(A1)/12+(DAY(NOW())-DAY(A1))/365
ik: YEAR(NOW())-YEAR(A1)+(MONTH(NOW())-MONTH(A1))/12+(DAY(NOW())-DAY(A1))/365
(hint: het zit hem in de haakjes)

met jouw oplossing is iemand die op 1-1-2009 geboren is: 11,99063927
met mijn oplossing is iemand die op 1-1-2009 geboren is: 0,990639269

Waarom ik het vroeg? Omdat ik me afvroeg wat het probleem was (Het was niet mijn probleem om mee te beginnen)
  maandag 28 december 2009 @ 16:28:34 #239
43584 Beregd
absolutely inch perfect
pi_76145435
ah, een haakje, boeiend.

Ik dacht dat je een vraag stelde, mijn excuses.
  maandag 28 december 2009 @ 16:33:32 #240
43584 Beregd
absolutely inch perfect
pi_76145623
om nog even terug te keren op de formule van dafan, die zal niet altijd werken omdat sommige jaren 366 dagen tellen, zeker als je over vele jaren rekent
pi_76146175
Ja ok, met leeftijd uitrekenen is gelukt.

Echter nog niet dit probleem: uit tabel (zie figuur) moet er dus automatisch worden gekozen dat iemand 'man' is en '1 jaar', en premieduur '15 jaar', dus er moet automatisch 5,00 (euro) worden geselecteerd.

Die 5, is 5 euro, dus er moet komen:

Premiekosten: 5 euro (=man, 1jaar, premieduur 15 jaar --> hier een formule voor)

Hopelijk zo goed uitgelegd
pi_76146342
quote:
Op maandag 28 december 2009 16:33 schreef Beregd het volgende:
om nog even terug te keren op de formule van dafan, die zal niet altijd werken omdat sommige jaren 366 dagen tellen, zeker als je over vele jaren rekent
Dat wordt pas na 100 jaar ofzo een issue, of de dag erna. Maar goed ik snap je punt
pi_76147977
quote:
Op maandag 28 december 2009 16:48 schreef RoaldReurink het volgende:
Ja ok, met leeftijd uitrekenen is gelukt.

Echter nog niet dit probleem: uit tabel (zie figuur) moet er dus automatisch worden gekozen dat iemand 'man' is en '1 jaar', en premieduur '15 jaar', dus er moet automatisch 5,00 (euro) worden geselecteerd.

Die 5, is 5 euro, dus er moet komen:

Premiekosten: 5 euro (=man, 1jaar, premieduur 15 jaar --> hier een formule voor)

Hopelijk zo goed uitgelegd
Wat is het regeltje om aan die 5 euro te komen, gegeven het geslacht en de leeftijd? Moet je dan niet ook de premieduur weten?

Als we het in een formule moeten vatten, zullen we toch eerst moeten weten wat de spelregels zijn.

Verder, wat is nou precies het gewenste resultaat? Je hebt het over automatisch 5,00 selecteren, maar hoe wil je dat weergeven? Als een regeltje onder Geboortedatum en Geslacht?

[offtopic]
Rare premieverdeling hanteer je en wat nou als er een vrouw van 3 langskomt?
[/offtopic]
pi_76152449
quote:
Op maandag 28 december 2009 17:42 schreef kingjotte het volgende:

[..]

Wat is het regeltje om aan die 5 euro te komen, gegeven het geslacht en de leeftijd? Moet je dan niet ook de premieduur weten?

Als we het in een formule moeten vatten, zullen we toch eerst moeten weten wat de spelregels zijn.

Verder, wat is nou precies het gewenste resultaat? Je hebt het over automatisch 5,00 selecteren, maar hoe wil je dat weergeven? Als een regeltje onder Geboortedatum en Geslacht?

[offtopic]
Rare premieverdeling hanteer je en wat nou als er een vrouw van 3 langskomt?
[/offtopic]
Ja de premieverdeling heb ik anders ingevoerd omdat ik niet weet of ik die mag posten. Deze verdeling is zo als ik het gekregen, leeftijd vrouw begint bij 5 jaar.



Dus als de drie variabelen bekent zijn (geb.datum, geslacht en premieduur) dan selecteer Excel automatisch het gele vlak. Als een klant bij registratie dus zijn/haar geboortedatum, geslacht heeft ingevuld, dan hoeft de klant alleen nog te zeggen hoe lang ze de premie wil (premieduur). Dan komt er automatisch te staan hoe duur dat voor de klant is (prijs per maand). Daar wil ik dus die formule in gebruiken, ik heb de premieverdeling en als het mogelijk is dat het automatisch het goede vakje selecteerd zou dat er makkelijk zijn.
pi_76156314
Okee, niet schrikken, dit is hem:
quote:
=INDEX(prijzen;IF(geslacht="man";MATCH((YEAR(NOW())-YEAR(geboortedatum)+(MONTH(NOW())-MONTH(geboortedatum))/12+(DAY(NOW())-DAY(geboortedatum))/365);leeftijden_man);MATCH((YEAR(NOW())-YEAR(geboortedatum)+(MONTH(NOW())-MONTH(geboortedatum))/12+(DAY(NOW())-DAY(geboortedatum))/365);leeftijden_vrouw));MATCH(duur;premie_lengtes))
om het wat leesbaarder te maken heb ik even een extra veld "leeftijd" toegevoegd, dan ziet het er zo uit:
quote:
=INDEX(prijzen;IF(geslacht="man";MATCH(leeftijd;leeftijden_man);MATCH(leeftijd;leeftijden_vrouw));MATCH(duur;premie_lengtes))
ik heb alle relevante cellen (of cellranges) een naam gegeven, dit houdt je "code" ook wat beter onderhoudbaar.

Wat ik hier doe is het volgende: ik zoek in de range "prijzen" de goede cel op met INDEX
INDEX lust een range (prijzen), en een rijnummer en kolomnummer binnen die range
het kolomnummer (de laatste parameter) is het makkelijkst, want die is voor zowel mannen als vrouwen hetzelfde (namelijk afhankelijk van de duur van het contract) dus die zoeken we gewoon op met MATCH(duur;premie_lengtes)

Het rijnummer is iets lastiger, daarvoor hebben we naast MATCH ook nog IF nodig, om onderscheid te maken tussen mannetjes en vrouwtjes.

Ik hoop dat het zo een beetje duidelijk is, anders hoor ik het wel.
pi_76232076
Hoi all, ik maak mbv deze code een calendar aan:

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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
Const SjabloonBladnaam As String = "Sjabloon"
Const WeekNummerCel As String = "B1"
Const DatumMaandag As String = "C2"

Public NieuweAgenda As Object

Sub MaakAgenda(Jaar As Long)
  Dim WeekNummer As Integer, DefaultSheets As Integer

  With Application
    'Haal de flikkering weg
    .ScreenUpdating = False

    'Zet het aantal sheets in nieuw workbook op 1
    DefaultSheets = .SheetsInNewWorkbook
    .SheetsInNewWorkbook = 1

    'Maak nieuw nieuwe agenda aan
    Set NieuweAgenda = .Workbooks.Add

    'weken van het jaar
    WeekNummer = ISOweeknum(DateSerial(Jaar, 1, 1))
    'Week 52/53
    If WeekNummer > 1 Then
      Call VulAgenda(WeekNummer, Jaar)
    End If
    'Week 1 -> 52/53
    For WeekNummer = 1 To ISOweeknum(DateSerial(Jaar, 12, 31))
      Call VulAgenda(WeekNummer, Jaar)
    Next

    'Opruimen
    .DisplayAlerts = False
    NieuweAgenda.Sheets(1).Delete
    NieuweAgenda.Sheets(1).Select
    'ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
    .DisplayAlerts = True
    Set NieuweAgenda = Nothing
    .SheetsInNewWorkbook = DefaultSheets
    .ScreenUpdating = True
  End With
End Sub
Sub VulAgenda(WeekNummer As Integer, Jaar As Long)
  Dim Maandag As Date, SheetName As String

  Maandag = ISOweeknumNaarDatum(Jaar, WeekNummer)
  ThisWorkbook.Sheets(SjabloonBladnaam).Copy After:=NieuweAgenda.Sheets(NieuweAgenda.Sheets.Count)
  With NieuweAgenda.ActiveSheet
    SheetName = CStr(" Week " & WeekNummer)
    If SheetExists(NieuweAgenda, SheetName) Then SheetName = SheetName & "-"
    .Name = SheetName
    .Range(WeekNummerCel) = WeekNummer
    .Range(DatumMaandag) = Maandag
  End With
End Sub

Public Function ISOweeknumNaarDatum(ByVal Jaar As Integer, ByVal Week As Integer) As Date
  Dim Maandag As Date, Weeknum As Integer

  Maandag = EersteMaandagJaar(Jaar)
  Weeknum = ISOweeknum(Maandag)
  'If Weeknum = 53 Then Weeknum = 52
  ISOweeknumNaarDatum = ((Week - Weeknum) * 7) + Maandag
End Function

Public Function ISOweeknum(ByVal Datum As Date) As Integer
  ISOweeknum = DatePart("ww", Datum, vbMonday, vbFirstFourDays)
End Function

Private Function EersteMaandagJaar(ByVal Jaar As Integer) As Date
  Const DONDERDAG = 4
  Dim Nieuwjaar As Date, Weekdag As Integer

  Nieuwjaar = DateSerial(Jaar, 1, 1)
  Weekdag = DatePart("w", Nieuwjaar, vbMonday, vbFirstFourDays) - 1
  EersteMaandagJaar = Nieuwjaar - Weekdag
  If Weekdag > DONDERDAG Then EersteMaandagJaar = EersteMaandagJaar + 7
End Function

'SheetExists Function -> Bestaat de sheet al in het workbook
Private Function SheetExists(Book As Object, SheetName As String) As Boolean
'   Geeft TRUE als sheet bestaat in het actieve workbook
  On Error Resume Next
  Dim x As Object

  SheetExists = False
  Set x = Book.Sheets(SheetName)
  If Err = 0 Then SheetExists = True
  On Error GoTo 0
End Function


Nu is het probleem alleen dat nu ik die van 2010 wil maken, de weektelling niet klopt Maandag week is is geen 4 januari om een of andere reden, ziet iemand waarom ?

Week 53 is goed, maar dan begint week 1 op maandag 29-12 ?
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
  FOK!fossiel maandag 4 januari 2010 @ 14:53:11 #247
8443 cptmarco
it's captain...
pi_76399047
ik weet niet meer hoe de formule gaat...

Stel (voorbeeld puur voor de formule):
In kolom A staat onder elkaar:: AA20091 t/m AA2009100
In kolom B wil ik alleen maar het stuk na 'AA2009' hebben, dus 1 t/m 100

Via een mooie formule kun je het eerste gedeelte weglaten zodat alleen het laatste deel overblijft...
pi_76401151
=RIGHT(A1,LEN(A1)-6))
pi_76405214
Ik ben op dit moment bezig met een opdracht voor een bedrijf en daarvoor moet ik enorme hoeveelheden data verwerken.

Ik liep daarbij tegen het volgende probleem aan:

Ik gebruik Excel 2007 en wil een aantal pivot graphs maken van data bestaande uit meer dan 1,5 miljoen rijen. Omdat deze Excelversie per tabblad maar iets meer dan een miljoen rijen aan data kan herbergen, moest ik de data verdelen over twee tabbladen.

Nu wil ik voor de analyse van de data doormiddel van pivot tabels and graphs (draaitabellen en -grafieken) alle data selecteren in de pivot wizard, maar op een of andere manier lukt dat niet met de gebruikelijke scheidingstekens waarmee je een range over verschillende gebieden aangeeft, zoals de komma of punt-komma.

bv.

'TAB1'!A1:H3,'TAB2'!A1:H3 werkt niet.



Verder geeft de wizard ook geen mogelijkheid om meerdere ranges aan te geven. Op welke manier moet nu de data selecteren van de twee tabs? Zijn er andere operators voor dit soort situaties? Of moet ik iets met haakjes doen ofzo?

NB Wat aanvullende informatie: ja het aantal kolommen zijn aan elkaar gelijk en de kolommen hebben dezelfde titels (hoef of moet ik de titels trouwens maar 1 keer selecteren?)

[ Bericht 6% gewijzigd door M-Bozz op 04-01-2010 20:23:34 ]
-
  FOK!fossiel maandag 4 januari 2010 @ 18:26:38 #250
8443 cptmarco
it's captain...
pi_76410634
Stel je hebt de volgende file:



De status (bedragen) van de items JAS, BROEK, SHIRT etc. worden dagelijks bijgewerkt... waarbij dus bedragen per datum per item verschillen. Het format is wel in deze volgorde... dus gegroepeerd per item, en dat per datum (in een bep. range).

Uit deze lijst wil ik hetvolgende kunnen creëren:



Waarbij de datum in cel B3 ook dagelijks verandert. Ik wil graag dat Excel in cel B3 kijkt en in cel A5 t/m A8 en dan de goede waarde opzoekt in de lijst van de eerste screenshot. Dubbele waarden kunnen niet voorkomen, de combinaties Item-datum zijn uniek.

Heb lopen zoeken met index, match en vlookup, maar kom er niet uit (geen expertise). Het liefste zonder macro's graag.

Iemand een oplossing??
pi_76413335
quote:
Iemand een oplossing??
Gebruik dynamische tabellen (ook wel draaitabellen of pivot tabels genoemd). Er staat genoeg handleidingen online!

Cel B3 kun je dan krijgen als een optielijst, maar je kan ook alle datums naast elkaar zetten. Hetzelfde geldt voor de produkten. Ook kun je met de functie dynamische grafieken heel gemakkelijk allerlei figuurtjes maken: met verkoopcijfers, gemiddelden, etc.

Je kan in een spread sheet dan dagelijks je lijst met gegevens aanvullen. Als je vervolgens weer je overzichtje wil bekijken moet je wel even de tabel updaten (rechter muisknop op de tabel en dan op "actualiseren" of "updaten" klikken; ik gebruik een Spaanse versie dus ik weet niet wat er staat).
-
pi_76417467

Waar G2:
1=SUMPRODUCT((B2:B28=$F2)*(A2:A28=$G$1)*(D2:D28))

En dan gewoon doorgetrokken naar beneden.

Hoop dat dat duidelijk genoeg is!
  maandag 4 januari 2010 @ 22:04:27 #254
28946 mirelia
Neehee ik ben geen vrouw!!
pi_76417620
tvp
Shuffle up and deal!!!
pi_76421916
quote:
Op maandag 4 januari 2010 22:01 schreef DaFan het volgende:
[ afbeelding ]
Waar G2:
[ code verwijderd ]

En dan gewoon doorgetrokken naar beneden.

Hoop dat dat duidelijk genoeg is!
Fantastisch, precies way ik zocht! Zo leer ik nog eens wat!
pi_76423354
lol, toch weer een sumproduct kunnen slijten DaFan.
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_76424521
quote:
Op dinsdag 5 januari 2010 00:08 schreef Deetch het volgende:
lol, toch weer een sumproduct kunnen slijten DaFan.


It gets the job done
pi_76424799
quote:
Op dinsdag 5 januari 2010 00:50 schreef DaFan het volgende:

[..]



It gets the job done

Mogen trouwens de zoekranges in de formule =SUMPRODUCT((B2:B28=$F2)*(A2:A28=$G$1)*(D2:D28)) ongestraft vergroot worden met (nog) lege cellen aan de onderzijde?
.

Dus B2:B28 => B2:B2000
en A2:A28 => A2:A2000
en D2:D28 => D2:D2000


Dit om de zoeklijst flexibel te maken voor uitbreiding met meer Items (stel ik ga JEANS toevoegen), of om per artikel een grotere datum-reeks toe te laten (nu 12 datums, straks misschien een range van 16 datums).
Als dat ongestraft kan, dan is het flexibeler en hoef ik niet alle SUMPRODUCT formules telkens aan te passen...
pi_76427178
Ja dat mag, je moet er alleen aan denken dat in een SUMPRODUCT je ranges altijd even lang moeten zijn. B2:B2000 en A2:A2000 werkt wel, B2:2000 en A1:A2000 werkt niét.

Je kan er nog een extra voorwaarde aanplakken, *(B2:B2000<>"")* bijvoorbeeld dan rekent ie alleen met niet-lege cellen.
Of je plakt er een IF omheen, want er zullen ws errors uitkomen als er een lege cel tussen zit.

Succes.
pi_76440906
quote:
Op maandag 4 januari 2010 23:34 schreef elkravo het volgende:

[..]

Fantastisch, precies way ik zocht! Zo leer ik nog eens wat!
Ik raad je ook aan mijn tip eens te bekijken.. de mogelijkheden van die dynamische tabellen zijn legio!

Kan niemand mij helpen bij mijn vraag van gisteren?
-
pi_76441656
M-bozz. mijn tip is om de data eerst te gaan groeperen en of middelen. Van 1.5 miljoen datarijen wordt geen enkel programma blij plus het gebruiken van al deze data heeft (meestal) geen enkele meerwaarde ten opzichte van zeg 100 duizend rijen (reductie van 90%) of 10000 rijen (reductie van data met 99%)
Overweeg dus om eerst met een statistische tool bijvoorbeeld uur gemiddelden of dergelijke te maken waarbij je de standaard deviatie van die dag ook berkend om evenueel spreiding in je grafieken aan te geven.

Vroeger kon je in excel-grafieken slechts 32000 getallen kwijt in een enkele reeks.
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_76442694
Yo, thanks voor je tip, maar het gaat om een grootschalige evaluatie van een bussysteem en deze +1M velden zijn daarvoor nodig. De meetfouten en extreme waarden zijn er trouwens al uitgehaald.

Ik weet dat het systeem niet blij van deze hoeveelheid data wordt.. maar dat interesseert me niet zoveel. Er moet toch een mogelijkheid zijn om data uit twee sheets (uit een bestand) te selecteren?

Dus nogmaals thanks voor je tip, ik zal eens met mijn begeleider erover spreken, maar weet je toevallig een manier om informatie uit meerdere sheets te selecteren?
-
pi_76446595
quote:
Op dinsdag 5 januari 2010 15:46 schreef M-Bozz het volgende:

[..]

Ik raad je ook aan mijn tip eens te bekijken.. de mogelijkheden van die dynamische tabellen zijn legio!

Kan niemand mij helpen bij mijn vraag van gisteren?
PIvot tables zijn handig, maar in mijn zaak bestaat de uiteindelijke tabel al, en moet die veelvuldig berekend worden door mensen die nog slechter als ik in Excel zijn... dan heb ik liever een uitgekauwd stukje paraat... nevertheless bedankt voor je idee
pi_76453537
quote:
Op dinsdag 5 januari 2010 18:01 schreef elkravo het volgende:

[..]

PIvot tables zijn handig, maar in mijn zaak bestaat de uiteindelijke tabel al, en moet die veelvuldig berekend worden door mensen die nog slechter als ik in Excel zijn... dan heb ik liever een uitgekauwd stukje paraat... nevertheless bedankt voor je idee
Als je mij een voorbeeldbestand (of een van je echte bestanden, wat jij wil) stuurt, dan wil ik wel even proberen wat voor je in elkaar te draaien.. Het leuke ervan is dat het dynamisch is en je alleen de tabel of grafiek hoeft te updaten na het aanvullen van je sheet...
-
pi_76523067
Beste helden,

Ik zit met het volgende, in kolom a staan verschillende waardes die ik wil onderscheiden in 4 groepen in kolom b.
Als de waarde in a <10 is wordt het 1.
Als de waarde in tussen de 10 en 20 ligt wordt het 2.
Als de waarde tussen de 20 en 30 ligt wordt het 3
En als de waarde boven de 30 komt is het 4.

Met de als functie kom ik niet zo ver.

=ALS(OF(T2<10;T2>20);0;1)

Dat is hoever ik nu ben.
  donderdag 7 januari 2010 @ 14:55:06 #266
43584 Beregd
absolutely inch perfect
pi_76523483
=max(1;min(1+int(T2/10);4))

edit: int nederlands is het natuurlijk =max(1;min(1+integer(T2/10);4))
pi_76523567


Waar D1 =
=VERT.ZOEKEN(C1;A1:B4;2;1)

Of:
=ALS(C1<10;1;ALS(C1<20;2;ALS(C1<30;3;4)))
pi_76523583
Of wat Beregd zegt
Mogelijkheden zijn legio.

Netjes trouwens, hoe kom je daarbij? Ik zou zoiets nooit doen/bedenken, en ik ben toch niet erg slecht in Excel Of is het meer een wiskunde ding?
pi_76523612
quote:
Op donderdag 7 januari 2010 14:55 schreef Beregd het volgende:
=max(1;min(1+int(T2/10);4))
Die werkt helaas niet.
Het zou overigens helemaal top zijn als de waardes in kolom b niet per se 1,2,3 of hoeven te zijn maar het ook woorden kunnen zijn.
pi_76523655
ff proberen
pi_76523674
Dan moet je de VLOOKUP oplossing gebruiken.
Sorry ik heb op werk alleen Nederlandse versie, geen Engels.
pi_76523866
quote:
Op donderdag 7 januari 2010 14:57 schreef DaFan het volgende:
[ afbeelding ]

Waar D1 =
=VERT.ZOEKEN(C1;A1:B4;2;1)

Of:
=ALS(C1<10;1;ALS(C1<20;2;ALS(C1<30;3;4)))
Die 2e doet precies wat ik zoek.
Muchos thankios.
pi_76523906
quote:
Op donderdag 7 januari 2010 14:59 schreef DaFan het volgende:
Dan moet je de VLOOKUP oplossing gebruiken.
Sorry ik heb op werk alleen Nederlandse versie, geen Engels.
Jij ook bedankt.
  vrijdag 8 januari 2010 @ 10:09:12 #274
159841 Dzy
It is I
pi_76553858
Ik ben een beetje aan het klooien met Excel Solver voor een aantal opdrachten op school, het ging de hele tijd goed tot de laatste opdracht. Het was een kanstabel van twee stochasten die poissonverdeeld zijn. Om dit mooi dynamisch te krijgen heb ik er een aantal if-statements in gegooid, maar de tabel is wel iets van 50x80 cellen met elk een dubbele if. Hij geeft gewoon geen optimale waarde, met de hand wat invullen zorgde al voor betere waardes. Mijn docent denkt dat het iets met die if's te maken heeft. Dat zou goed kunnen, ik vroeg me alleen af of er patches voor zijn, misschien andere solver add-ins? Anders kan ik ook het model wel iets aanpassen maar ik vond mijn huidige oplossing wel heel elegant

Thanks!
"Reality is an illusion created by a lack of alcohol."
pi_76554061
heb je je aantal iteraties al vergroot en het wenselijke verschil al verkleind? De solver kan ook gevoelig zijn voor het beginpunt van je iteraties omdat hij mogelijk lokale minima vangt ipv het absolute minimum.
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_76564158
Geen zin in de zoekfunctie, dus ik stel mn vraag hier maar

Ik heb een enorme hoeveelheid data, die excel niet kan verwerken. Excel heeft een limiet van 65000 gegevens in een rij.

Een grafiek heeft ene nog lagere limiet dan dat.
Is er een optie binnen excel dat dat wel kan? Of moet ik dan een ander spreadsheet programma gebruiken ?
Kom ook eens spammen in mijn fotoboek :') **En ja, ik zie er goed uit dat hoef je niet nog eens te vermelden! ** ( hihi )
  vrijdag 8 januari 2010 @ 15:10:42 #277
43584 Beregd
absolutely inch perfect
pi_76565169
of een andere excel, de nieuwe kan dat wel
pi_76565418
Tja upgraden naar 2007, die heeft een miljoen regels als max...andere optie is er niet.
pi_76567134
quote:
Op vrijdag 8 januari 2010 14:49 schreef kippiej het volgende:
Geen zin in de zoekfunctie, dus ik stel mn vraag hier maar

Ik heb een enorme hoeveelheid data, die excel niet kan verwerken. Excel heeft een limiet van 65000 gegevens in een rij.

Een grafiek heeft ene nog lagere limiet dan dat.
Is er een optie binnen excel dat dat wel kan? Of moet ik dan een ander spreadsheet programma gebruiken ?
Excel voor 2007
De kolomlimiet is 65000 (dus van boven naar beneden)
De rijlimiet is 256 (van links naar rechts)
Grafieklimiet is 32000 per dataserie

In 2007:
kolom 1048576
rij 16384
grafieklimiet is nog steeds 32000 per dataserie
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_76587878
Voor mijn afstudeeropdracht maak ik gebruik van een erg fijn instrument die een .txt output heeft met 280 regels. Elk van deze regels is een reeks van reactietijden op een bepaalde stimuli. Er zijn dus 280 stimuli aangeboden. Verder bestaat elke reactie op de stimuli uit 4 reactietijden en een 'break'. Maar, mensen kunnen ook fouten maken bij de stimuli, wat resulteert in meer dan 4 reactietijden weer incl een break.

Enfin, omzetten naar excel gaat prima. Ik krijg in excel de kolommen A tm M in het geval van een 'goede' trial. Deze bestaat uit kolom A B C met informatie over de aangeboden stimuli, D tm M bestaat uit 4 reactie tijden (D is de tekst RT1, en E is de daarbij horende RT), en een break. In het geval van een error loopt het aantal kolommen op. Dit kan bijvoorbeeld oplopen tot kolom AO.

Nu wil het geval, dat ik per regel, slechts kolom A B C, en de laatste 4 kolommen van deze zelfde regel nodig heb. Dit is handmatig niet te doen, ik heb 280 regels maal minimaal 20 personen.

Ik vraag me dus af of het met (wellicht een makro?) mogelijk is om per regel excel te laten kijken wat de laatste 4 kolommen zijn per regel, en deze samen met de kolommen ABC te kopieren naar een nieuw werkblad.

Daarnaast zou het ook helemaal geweldig zijn wanneer excel kijkt of de regel langer is dan kolom M, is dat het geval, deze dan het cijfer 1 te geven. Is dit niet het geval, dan krijgt hij het cijfer 2.


Ik zal zeker ook mee zoeken naar een manier om dit te realiseren, maar wellicht hebben jullie nog een goede ingeving
pi_76593671
Hoe kan ik de onderkant van een werkblad verwijderen? Ik heb bijv. door op A te klikken en een lijn aan de zijkant van deze kolommen te doen een lijn naar het oneindige lopen, terwijl dat maar tot rij 200 ofzo moet. Nu zeg je misschien: dat kun je toch gewoon handmatig ff volledig wehalen en vervolgens enkel een lijn tot rij 200 zetten.
Neen dat kan niet, want dit blad is megagroot waardoor ik daar uren mee bezig ben.
  zaterdag 9 januari 2010 @ 15:20:32 #282
158136 Joooo-pi
Do you want a balloon...
pi_76600611
quote:
Op zaterdag 9 januari 2010 01:02 schreef ColaKoning het volgende:
Voor mijn afstudeeropdracht maak ik gebruik van een erg fijn instrument die een .txt output heeft met 280 regels. Elk van deze regels is een reeks van reactietijden op een bepaalde stimuli. Er zijn dus 280 stimuli aangeboden. Verder bestaat elke reactie op de stimuli uit 4 reactietijden en een 'break'. Maar, mensen kunnen ook fouten maken bij de stimuli, wat resulteert in meer dan 4 reactietijden weer incl een break.

Enfin, omzetten naar excel gaat prima. Ik krijg in excel de kolommen A tm M in het geval van een 'goede' trial. Deze bestaat uit kolom A B C met informatie over de aangeboden stimuli, D tm M bestaat uit 4 reactie tijden (D is de tekst RT1, en E is de daarbij horende RT), en een break. In het geval van een error loopt het aantal kolommen op. Dit kan bijvoorbeeld oplopen tot kolom AO.

Nu wil het geval, dat ik per regel, slechts kolom A B C, en de laatste 4 kolommen van deze zelfde regel nodig heb. Dit is handmatig niet te doen, ik heb 280 regels maal minimaal 20 personen.

Ik vraag me dus af of het met (wellicht een makro?) mogelijk is om per regel excel te laten kijken wat de laatste 4 kolommen zijn per regel, en deze samen met de kolommen ABC te kopieren naar een nieuw werkblad.

Daarnaast zou het ook helemaal geweldig zijn wanneer excel kijkt of de regel langer is dan kolom M, is dat het geval, deze dan het cijfer 1 te geven. Is dit niet het geval, dan krijgt hij het cijfer 2.


Ik zal zeker ook mee zoeken naar een manier om dit te realiseren, maar wellicht hebben jullie nog een goede ingeving
zoals ik het lees, zou dit een oplossing 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
Sub Knop1_Klikken()
'loop maken om door de rijen heen te lopen
rw = 1
Do
    'nu een loopje om de laatste kolom te zoeken
    klm = 0
    Do
        klm = klm + 1
    Loop Until Cells(rw, klm).Value = ""
    
    'nu op basis van rw en klm de gegevens over nemen op het 2e blad
    For j = 1 To 3
        Sheets("Blad2").Cells(rw, j).Value = Sheets("Blad1").Cells(rw, j).Value
    Next j
    For j = 1 To 4
        Sheets("Blad2").Cells(rw, (j + 3)).Value = Sheets("Blad1").Cells(rw, (klm - 5 + j)).Value
    Next j

If klm>13 then
              Sheets("Blad2").cells(rw, 8).value = 1
else
             Sheets("Blad2").cells(rw, 8).value = 2
end if
    rw = rw + 1
Loop Until Cells(rw, 1).Value = ""

End Sub


[ Bericht 2% gewijzigd door Joooo-pi op 09-01-2010 15:44:44 (check op klm > 13 er tussen) ]
heitieh
  zaterdag 9 januari 2010 @ 15:24:10 #283
158136 Joooo-pi
Do you want a balloon...
pi_76600720
quote:
Op zaterdag 9 januari 2010 11:37 schreef EddyAlbena het volgende:
Hoe kan ik de onderkant van een werkblad verwijderen? Ik heb bijv. door op A te klikken en een lijn aan de zijkant van deze kolommen te doen een lijn naar het oneindige lopen, terwijl dat maar tot rij 200 ofzo moet. Nu zeg je misschien: dat kun je toch gewoon handmatig ff volledig wehalen en vervolgens enkel een lijn tot rij 200 zetten.
Neen dat kan niet, want dit blad is megagroot waardoor ik daar uren mee bezig ben.
ik weet niet of dit je helpt, maar je kan met ctrl en pijltje naar beneden naar de laatst gevulde cel van dat blokje gaan. Als je dat dan doet terwijl je shift ingedrukt houdt, dan heb je snel de 1e t/m de laatste cel van die kolom geselecteerd. Kun je toch handmatig een rand maken.
heitieh
  zaterdag 9 januari 2010 @ 15:43:41 #284
158136 Joooo-pi
Do you want a balloon...
pi_76601276
edit
heitieh
pi_76686212
quote:
Op zaterdag 9 januari 2010 15:24 schreef Joooo-pi het volgende:

[..]

ik weet niet of dit je helpt, maar je kan met ctrl en pijltje naar beneden naar de laatst gevulde cel van dat blokje gaan. Als je dat dan doet terwijl je shift ingedrukt houdt, dan heb je snel de 1e t/m de laatste cel van die kolom geselecteerd. Kun je toch handmatig een rand maken.
Perfect! Alles weg Dank!
pi_76713410
Hallo, ik heb een invulformulier waarbij ik eigenlijk wil voorkomen dat autofill uitstaat.

Nu is dit een optie binnen Excel om dit aan of uit te zetten maar volgens mij geldt dit dan alleen op mijn pc en niet op een andere pc waar men dit formulier gaat invullen. Is er een andere manier om te voorkomen dat er wordt gekeken naar andere cellen? thx alvast
pi_76717310
Plak dit in VBA editor - ThisWorkbook:
1
2
3
4
5
Private Sub Workbook_Open()

Application.EnableAutoComplete = False

End Sub


Dan zet ie m automatisch uit als iemand het bestand opent.
pi_76717544
quote:
Op dinsdag 12 januari 2010 13:11 schreef DaFan het volgende:
Plak dit in VBA editor - ThisWorkbook:
[ code verwijderd ]

Dan zet ie m automatisch uit als iemand het bestand opent.
thx goede tip. Er zijn best wel wat mensen die dit document moeten gaan invullen. Veel mensen hebben macro's uitstaan vermoed ik. Ik heb het nu opgelost door een lege regel toe te voegen. Dan pakt hij hem ook niet mee.

Ander vraagje nog. Als ik het document open wordt de melding gegeven dat het document macro's bevat. Het document zelf bevat geen macro's hoe kan het dat deze melding wordt gegeven? Kan ik zien waarvoor macro's worden gebruikt?
pi_76721633
Ook een prima oplossing idd!
Ik heb dat ook vaak, en eerlijk gezegd nog nooit moeite gedaan om te bekijken waarom dat gebeurt.
  dinsdag 12 januari 2010 @ 15:47:19 #290
158136 Joooo-pi
Do you want a balloon...
pi_76723395
is de extensie .xlsm of .xlsx?
heitieh
pi_76738622
quote:
Op dinsdag 12 januari 2010 15:47 schreef Joooo-pi het volgende:
is de extensie .xlsm of .xlsx?
Xls
  dinsdag 12 januari 2010 @ 21:17:15 #292
28946 mirelia
Neehee ik ben geen vrouw!!
pi_76738831
Ik heb in een sheet de volgende formule staan =SUM(G10+I10). maar omdat gevraagde cellen nog leeg zijn geeft deze cel nu #VALUE! aan en dat vind ik er niet uitzien. wat kan je daar aan veranderen?
Shuffle up and deal!!!
pi_76746383
quote:
Op dinsdag 12 januari 2010 21:17 schreef mirelia het volgende:
Ik heb in een sheet de volgende formule staan =SUM(G10+I10). maar omdat gevraagde cellen nog leeg zijn geeft deze cel nu #VALUE! aan en dat vind ik er niet uitzien. wat kan je daar aan veranderen?
je kan dan werken met de formule isfout en als. Iets als =als(isfout(som(g10+I10));"nog geen waarde of 0";G10+I10) of met de formula isgetal. Dan wordt het zoiets als =ALS(EN(ISGETAL(G10);ISGETAL(G11));G10+G11;"nog geen waarde ingevuld").
De engelse formule namen moet je even zelf opzoeken op http://www.applewood.nl/forms/3000/FRM-004/index.asp.

s6
  dinsdag 12 januari 2010 @ 23:43:47 #294
62215 qu63
..de tijd drinkt..
pi_76746846
quote:
Op dinsdag 12 januari 2010 23:32 schreef jakees het volgende:

[..]

je kan dan werken met de formule isfout en als. Iets als =als(isfout(som(g10+I10));"nog geen waarde of 0";G10+I10) of met de formula isgetal. Dan wordt het zoiets als =ALS(EN(ISGETAL(G10);ISGETAL(G11));G10+G11;"nog geen waarde ingevuld").
De engelse formule namen moet je even zelf opzoeken op http://www.applewood.nl/forms/3000/FRM-004/index.asp.

s6
of

ALS(OF(G10="";G11="");"leeg";G10+G11)
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_76747854
quote:
Op dinsdag 12 januari 2010 23:43 schreef qu63 het volgende:

[..]

of

ALS(OF(G10="";G11="");"leeg";G10+G11)
Ja ik zou zeggen dat die cellen G10/G11 formules of vlookups bevatten die nog geen waarde hebben of een waarde in de trand van #NB of tekstueel iets. Weet jij wanneer er #VALUE in een kolom komt? Dat is volgens mij niet als je een optelsom doet met lege cellen. Dan komt er gewoon 0 te staan.
  woensdag 13 januari 2010 @ 08:00:31 #296
158136 Joooo-pi
Do you want a balloon...
pi_76750607
quote:
Op dinsdag 12 januari 2010 21:13 schreef jakees het volgende:

[..]

Xls
ok, zegt niks dus ...
heitieh
pi_76750755
quote:
Op woensdag 13 januari 2010 08:00 schreef Joooo-pi het volgende:

[..]

ok, zegt niks dus ...
Hoe bedoel je? Als het Xlsm is dan is het een macro of zo?
pi_76750940
Jakees heeft gelijk, waarschijnlijk geeft een van de twee cellen al een error. Anders wordt een lege cel gewoon als 0 behandeld, en heeft de formule van joooo-pi dus geen nut.

Mirelia: Waarom gebruik je SUM(G1+F1). Dat is overbodige tekens gebruiken. "G1+F1" volstaat, óf SUM(G1;F1), maar das alleen handig als je een langere range hebt.
pi_76751126
hallo,

Ik wil in excel een formulier invoegen en verwijzen naar vakje p7.
zo gezegt zo gedaan.
nu wil ik ook p8 t/m p80 doen kan ik dit snel doen zonder 1 voor 1 hoeven toe te verwijzen?

vriendelijke groet G
gurdi
  woensdag 13 januari 2010 @ 13:22:22 #300
158136 Joooo-pi
Do you want a balloon...
pi_76759194
quote:
Op woensdag 13 januari 2010 08:17 schreef jakees het volgende:

[..]

Hoe bedoel je? Als het Xlsm is dan is het een macro of zo?
Volgens mij wel in de laatste versie van Office.
heitieh
  woensdag 13 januari 2010 @ 13:24:46 #301
158136 Joooo-pi
Do you want a balloon...
pi_76759288
quote:
Op woensdag 13 januari 2010 08:35 schreef DaFan het volgende:
Jakees heeft gelijk, waarschijnlijk geeft een van de twee cellen al een error. Anders wordt een lege cel gewoon als 0 behandeld, en heeft de formule van joooo-pi dus geen nut.

Mirelia: Waarom gebruik je SUM(G1+F1). Dat is overbodige tekens gebruiken. "G1+F1" volstaat, óf SUM(G1;F1), maar das alleen handig als je een langere range hebt.
wie ik? Mis ik iets?

Verder in: Link

[ Bericht 5% gewijzigd door Joooo-pi op 13-01-2010 14:59:33 ]
heitieh
abonnement Unibet Coolblue
Forum Opties
Forumhop:
Hop naar:
(afkorting, bv 'KLB')