abonnement Unibet Coolblue
pi_120212570
quote:
0s.gif Op dinsdag 11 december 2012 21:00 schreef Landgeld het volgende:

[..]

Oke, eens kijken. Kan ik die raadplegen via de functie module?
Jawel. En via de help. En anders hier maar kan krijg je het voorgekauwd en leer je niks ;)
pi_120224854
Ik download wel eens CSV files vanuit mijn bank. Deze gegevens zijn dan gescheiden met een komma, punt of puntkomma teken. Hoe kan ik deze gegevens geautomatiseerd in een tabel stoppen per kolom?
  woensdag 12 december 2012 @ 12:41:46 #278
62215 qu63
..de tijd drinkt..
pi_120225338
quote:
0s.gif Op woensdag 12 december 2012 12:25 schreef DarkSavior het volgende:
Ik download wel eens CSV files vanuit mijn bank. Deze gegevens zijn dan gescheiden met een komma, punt of puntkomma teken. Hoe kan ik deze gegevens geautomatiseerd in een tabel stoppen per kolom?
Je zou een import-macro kunnen maken. Nieuw Excel-document openen, macro starten en dan importeren. Na afloop macro stoppen en aanpassen zodat ie de cellen invoegt na de laatste rij.
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_120226067
Nu probeer ik kolommen weer om te zetten naar tekst met een komma als scheidingsteken en dan op te slaan als .csv file, maar ik kan de functie niet vinden. Iemand een idee?
  woensdag 12 december 2012 @ 13:09:44 #280
62215 qu63
..de tijd drinkt..
pi_120226302
quote:
0s.gif Op woensdag 12 december 2012 13:02 schreef DarkSavior het volgende:
Nu probeer ik kolommen weer om te zetten naar tekst met een komma als scheidingsteken en dan op te slaan als .csv file, maar ik kan de functie niet vinden. Iemand een idee?
Opslaan als?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_120226367
Het bestand zelf is een .xlsx bestand, als ik dan vervolgens opslaan als... .csv dan krijg ik een waarschuwing. De file bevat mogelijk functies die niet compatibel zijn.
  woensdag 12 december 2012 @ 13:19:42 #282
62215 qu63
..de tijd drinkt..
pi_120226634
quote:
0s.gif Op woensdag 12 december 2012 13:11 schreef DarkSavior het volgende:
Het bestand zelf is een .xlsx bestand, als ik dan vervolgens opslaan als... .csv dan krijg ik een waarschuwing. De file bevat mogelijk functies die niet compatibel zijn.
Ja, .csv's kunnen niet omgaan met functies, die hebben alleen data.
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_120228042
quote:
0s.gif Op woensdag 12 december 2012 12:25 schreef DarkSavior het volgende:
Ik download wel eens CSV files vanuit mijn bank. Deze gegevens zijn dan gescheiden met een komma, punt of puntkomma teken. Hoe kan ik deze gegevens geautomatiseerd in een tabel stoppen per kolom?
Als het een echte csv is dan zijn de gegevens met een , gescheiden. Als je in je windows als lijstscheidingsteken ook een , hebt dan kun je het bestand direct openen met excel.
In andere gevallen moet je idd een macro opnemen omdat je zelf het lijstscheidingteken dan moet aangeven.
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_120228057
quote:
0s.gif Op woensdag 12 december 2012 13:19 schreef qu63 het volgende:

[..]

Ja, .csv's kunnen niet omgaan met functies, die hebben alleen data.
en ook maar 1 tabblad
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_120231557
Antwoord aan Landgeld…
(mijn quotefunctie werkt niet)

Ik heb een Excel vraag met betrekking tot Voorwaardelijke opmaak
Ik wil dat de cel automatisch een waarde ingeeft (1 - 2 - 3) als een andere waarde wordt ingegeven.

Voorbeeld:

getal tussen 0-10 -> automatisch (in andere cel) het cijfer 1 tevoorschijn
getal tussen 10-20 -> automatisch (in andere cel) het cijfer 2 tevoorschijn
getal tussen 20-30 -> automatisch (in andere cel) het cijfer 3 tevoorschijn.

Met kleuren weet ik hoe ik dit moet doen, met cijfers kom ik er niet uit. Weet ongeveer waar ik moet zoeken maar weet niet hoe ik dit kan ingeven. Met kleuren lukt het wel. Heb Excel 2010.

Hier het antwoord:

Stel je 1e getal zit in vak a1
Zet dan in vak b1
=AFRONDEN.NAAR.BOVEN(+A1/10;0)
Je kunt beter één kaars opsteken dan duizend maal de duisternis vervloeken.
pi_120276634
Ik hoop dat iemand mij kan helpen dit makkelijk op te lossen - het zijn eigenlijk 2 "problemen".

Ik heb een map met allemaal dezelfde soort Excel bestanden - een stuk of 160.

Alle bestanden hebben de volgende bestandsnaam:

Boodschappen 2011 winkel 001.xls
Boodschappen 2011 winkel 002.xls
Boodschappen 2011 winkel 008.xls
etc. etc.

1) Bij alle bestandsnamen zou 2011 willen vervangen door 2012. Hoe kan ik dit makkelijk doen? Ik kan niets anders bedenken dan alles handmatig hernoemen, kan dit simpeler?

2011+spatie verwijderen als optie mag ook als dat makkelijker is.

2) Moeilijker probleem.
- van al deze excelbestanden is het eerste blad beveiligd (alleen bepaalde cellen kunnen ingevuld worden daardoor). Op dit eerste blad staat in een door beveiliging geblokkeerde cel de datum 31-12-2011. Deze moet ik dus in alle 160 excel sheets vervangen worden door 31-12-2012.

Per excelsheet moet ik dan deze openen - sheet unprotecten - wachtwoord intypen - datum wijzigen - sheet protecten - wachtwoord ingeven - wachtwoord nog een keer ingeven - opslaan.

Ik heb een macro geprobeerd via een personal.xls - maar de macro onthoudt denk ik geen wachtwoorden; hij stopt bij de eerst wachtwoord opgave. Het wachtwoord is trouwens voor alle sheets hetzelfde.

Kan ik deze actie efficienter doen, zonder dit 160 keer - blad voor blad te moeten doen?

Alvast bedankt voor de tips.
pi_120283463
Ik kom er niet uit met de IF (ALS) functie..
Dit wil ik bereiken in 1 cel (Dus met 1 formule):

getal tussen 0-10 -> automatisch (in andere cel) het cijfer 1 tevoorschijn
getal tussen 10-20 -> automatisch (in andere cel) het cijfer 2 tevoorschijn
getal tussen 20-30 -> automatisch (in andere cel) het cijfer 3 tevoorschijn.

Heb net allerlei tuturials gelezen en 1 formule lukt, namelijk: =IF(A1 <10, 1)
Het combineren van de bovengenoemde voorbeelden lukt echter niet en weigert Excel 2010 (foutmelding).

Iemand enig idee hoe ik deze IF formulie werkend kan krijgen in mijn bovengenoemde voorbeeld? Ik werk met IF (Engels) en in Excel 2010.
Love is in the air!
  donderdag 13 december 2012 @ 21:22:41 #288
346939 Janneke141
Green, green grass of home
pi_120283720
quote:
0s.gif Op donderdag 13 december 2012 21:17 schreef Landgeld het volgende:
Ik kom er niet uit met de IF (ALS) functie..
Dit wil ik bereiken in 1 cel (Dus met 1 formule):

getal tussen 0-10 -> automatisch (in andere cel) het cijfer 1 tevoorschijn
getal tussen 10-20 -> automatisch (in andere cel) het cijfer 2 tevoorschijn
getal tussen 20-30 -> automatisch (in andere cel) het cijfer 3 tevoorschijn.

Heb net allerlei tuturials gelezen en 1 formule lukt, namelijk: =IF(A1 <10, 1)
Het combineren van de bovengenoemde voorbeelden lukt echter niet en weigert Excel 2010 (foutmelding).

Iemand enig idee hoe ik deze IF formulie werkend kan krijgen in mijn bovengenoemde voorbeeld? Ik werk met IF (Engels) en in Excel 2010.
Je syntax klopt niet helemaal: de door jou genoemde formule hoort er te staan als
=IF(A1<10;1) dus zonder spaties en met een ; in plaats van , tussen de argumenten.

Om een als-clausule te maken waarbij de waarde tussen twee getallen moet zitten gebruik je AND:
=IF(AND(A1>10;A1<20);2)

Bedenk je zelf even wat er moet gebeuren als A1=10?
Opinion is the medium between knowledge and ignorance (Plato)
pi_120292598
Ik heb een lijst met veel waarden in 2 kolommen. In kolom A een id en in kolom B de waarde. Een voorbeeld:
ID Naam
1 Jan
1 Piet
1 Klaas
1 Henk
2 Wim
2 Leo
3 Sjors
4 Dirk

Wat ik wil is naast de ID's de waarden in 1 cel zetten dus
C D
1 Jan, Piet, Klaas, Henk
2 Wim, Leo
3 Sjors
4 Dirk

Transponeren zeg maar dan met heel veel unieke waarden in kolom A en B. Verticaal zoeken is niet te doen omdat bij de ene ID wel 20 waarden zijn dan krijg je een if met 20 then / else. Draaitabellen is volgens mij ook geen optie. Heeft iemand een idee? Thx alvast!
pi_120292803
quote:
0s.gif Op vrijdag 14 december 2012 01:21 schreef jakees het volgende:
Ik heb een lijst met veel waarden in 2 kolommen. In kolom A een id en in kolom B de waarde. Een voorbeeld:
ID Naam
1 Jan
1 Piet
1 Klaas
1 Henk
2 Wim
2 Leo
3 Sjors
4 Dirk

Wat ik wil is naast de ID's de waarden in 1 cel zetten dus
C D
1 Jan, Piet, Klaas, Henk
2 Wim, Leo
3 Sjors
4 Dirk

Transponeren zeg maar dan met heel veel unieke waarden in kolom A en B. Verticaal zoeken is niet te doen omdat bij de ene ID wel 20 waarden zijn dan krijg je een if met 20 then / else. Draaitabellen is volgens mij ook geen optie. Heeft iemand een idee? Thx alvast!
Ik heb een oplossing die niet heel super is maar wel werkt. In de kolom C heb ik nu gezet als formule:
=ALS(B2<>B1;A2;TEKST.SAMENVOEGEN(B1;A2)) ==> hiermee bouw ik dan het samenvoegen op net zo lang tot een nieuwe sleutel komt.

Daarnaast heb ik de volgende formule aangemaakt:
=ALS(B2<>B3;"ja";"nee")
Met die formule selecteer ik dan de laatste samenvoeging en dit geheel heb ik gekopieerd naar een ander blad en voila. Niet erg onderhoudsvriendelijk dus als jullie iets beters weten graag!
pi_120294257
quote:
0s.gif Op donderdag 13 december 2012 21:22 schreef Janneke141 het volgende:

[..]

Je syntax klopt niet helemaal: de door jou genoemde formule hoort er te staan als
=IF(A1<10;1) dus zonder spaties en met een ; in plaats van , tussen de argumenten.

Om een als-clausule te maken waarbij de waarde tussen twee getallen moet zitten gebruik je AND:
=IF(AND(A1>10;A1<20);2)

Bedenk je zelf even wat er moet gebeuren als A1=10?
Die puntcomma en komma is geheel afhankelijk van je windows instellingen en wat je daar als lijstscheidingsteken (list-seperator) gebruikt. Over het algemeen is het zo dat een Nederlands ingestelde computer ALS gebruik icm ; en een Engels/Amerikaans ingestelde computer IF icm met , . Combinaties komen ook voor maar dat is imho verwarrend.
Sowieso moet degene die ooit heeft bedacht dat de functies vertaald moesten worden een nekschot krijgen.

Kleine extra uitleg over IF
=IF(A1<10,1) geeft een 1 als de waarde kleiner dan 10 is. Als de waarde groter is (of gelijk aan) 10 dan krijg je FALSE te zien. Als je achter de 1 een komma zet kun je daar een uitdrukking neer zetten die getoond moet worden als A1 groter is dan 10.
=IF(A1<10,1,"groter dan 10")

Je kunt meerdere IFs ook combineren door eerste te checken op 1 voorwaarde en als die voorwaarde niet waar is kun je op de plek van de "groter dan 10" hierboven een tweede IF neerzetten, dit kan tot 7 niveaus.

Met het < of > teken sla je de grenswaarden nog over. <10 betekent exclusief 10. Dus je moet de grenzen ook ergens meenemen.
Ik ga er even vanuit dat er een 1 moet staan als de waarde 10 of kleiner is en een 2 als de waarde 20 of kleiner is maar groter dan 10.

Samenvattend zou dit de formule moeten zijn:
=IF(A1<=10,1,IF(A1<=20,2,3))
• als A1 kleiner of gelijk aan 10 dan 1
• als A1 niet kleiner of gelijk aan 10 dan check of A1 kleiner of gelijk aan 20 en dan 2
• alle andere gevallen 3
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
pi_120294708
quote:
0s.gif Op vrijdag 14 december 2012 01:46 schreef jakees het volgende:

[..]

Ik heb een oplossing die niet heel super is maar wel werkt. In de kolom C heb ik nu gezet als formule:
=ALS(B2<>B1;A2;TEKST.SAMENVOEGEN(B1;A2)) ==> hiermee bouw ik dan het samenvoegen op net zo lang tot een nieuwe sleutel komt.

Daarnaast heb ik de volgende formule aangemaakt:
=ALS(B2<>B3;"ja";"nee")
Met die formule selecteer ik dan de laatste samenvoeging en dit geheel heb ik gekopieerd naar een ander blad en voila. Niet erg onderhoudsvriendelijk dus als jullie iets beters weten graag!
Je kunt een eigen functie maken. Kopieer en plak onder staande code in een visual basic module van je spreadsheet.
Vervolgens kun je de formule gebruiken net als een normale formule.
=ConcatIf(A1,B1:B20,-1)

Deze kijkt of A1 voorkomt in de cel links (daar is de -1) voor van B1:B20 en als dat zo is wordt de tekst erachtergevoegd (met een , er tussen)

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Public Function ConcatIf(varCriteria, rngConcat As Range, iOffset As Integer) As String
'concatenates strings from rngConcat if varCriteria is met in column iOffset to the range (negative values for left)

Dim r As Range

For Each r In rngConcat
    If r.Offset(0, iOffset) = varCriteria Then
        If ConcatIf = "" Then
            ConcatIf = r
        Else
            ConcatIf = ConcatIf & "," & r
        End If
    End If
Next r

End Function
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
  zaterdag 15 december 2012 @ 01:18:37 #293
62215 qu63
..de tijd drinkt..
pi_120331186
Wat is nou de makkelijkste en snelste manier om cellen op te schonen van rare tekens en spaties voor en na? Code die ik nu heb loopt al een half uur over 2 kolommen met 1986 regels..

Enige eis is dat de formules die ik nu al heb blijven staan, dat was ik bij m'n eerste code even vergeten.. *slik*
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_120331619
1) zorg dat de calculatie uit staat wanneer je je cellen muteert
2) gebruik een reguliere expressie om je replace uit te voeren
  zaterdag 15 december 2012 @ 01:48:43 #295
62215 qu63
..de tijd drinkt..
pi_120331691
quote:
0s.gif Op zaterdag 15 december 2012 01:42 schreef snabbi het volgende:
1) zorg dat de calculatie uit staat wanneer je je cellen muteert
2) gebruik een reguliere expressie om je replace uit te voeren
calculatie was ik vergeten ja..

Ik had nu deze code draaien:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub RemoveLeadingSpaces()
Dim R As Range
Application.EnableEvents = False
On Error GoTo ErrH:
If TypeOf Selection Is Excel.Range Then
For Each R In Selection.Cells
If R.HasFormula = False Then
R.Value = Trim(R.Value)
R.Value = Application.WorksheetFunction.Clean(R.Value)
End If
Next R
End If
ErrH:
Application.EnableEvents = True
End Sub

-edit-

Onderstaande code deed de hele sheet (50 kolommen van 1986 rijden) binnen 1 minuut:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Sub RemoveLeadingSpaces()
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Application.EnableEvents = False
Dim R As Range
On Error GoTo ErrH:
If TypeOf Selection Is Excel.Range Then
For Each R In Selection.Cells
If R.HasFormula = False Then
R.Value = Trim(R.Value)
R.Value = Application.WorksheetFunction.Clean(R.Value)
End If
Next R
End If
ErrH:
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True
End Sub


[ Bericht 29% gewijzigd door qu63 op 15-12-2012 02:07:03 ]
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_120358120
Gebruik For Each R In Selection.SpecialCells(xlTextValues)
Hiermee selecteer je per definitie alleen de cellen met een waarde/zonder formule en hoeft je code dus niet de if te bevatten.
pi_120405691
Handig zeg die HasFormula, gaat in het "lijstje"
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 17 december 2012 @ 12:09:21 #298
62215 qu63
..de tijd drinkt..
pi_120410854
quote:
3s.gif Op maandag 17 december 2012 08:50 schreef Deetch het volgende:
Handig zeg die HasFormula, gaat in het "lijstje"
Die van snabbi is alleen handiger, scheelt weer een if-loop :)
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  maandag 17 december 2012 @ 13:59:52 #299
62215 qu63
..de tijd drinkt..
pi_120415019
Hmm.. Het is niet mogelijk om met vergelijken() de 2e, 3e, etc hit te laten zien, toch? Iemand een idee hoe ik dat wel kan doen? De lijst waarin gezocht moet worden kan niet aangepast worden, het rijnummer wat er uit komt moet namelijk gebruikt worden om gegevens uit een andere kolom op te zoeken..

-edit-

Heb al iets anders gevonden:
1=KLEINSTE(ALS('[Lijst obv SBI 2008 493 + 79 opgeschoond.xlsx]Lijst'!$B$2:$B$31357=$C2;RIJ('[Lijst obv SBI 2008 493 + 79 opgeschoond.xlsx]Lijst'!$B$2:$B$31357));RIJ($1:$1))
En bevestigen met ctrl+shift+enter.

Deze geeft nu het rijnummer weer van het bedrijf in C2 (en verder) uit het andere bestand :)

[ Bericht 55% gewijzigd door qu63 op 17-12-2012 14:42:45 ]
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_120416729
Met een hulpkolom helmaal vooraan (ivm VLOOKUP) zou je een heel eind moeten komen. Hierin zet je de volgende formule:

=(B1)&" #" &COUNTIF($B$1:B1,B1)

De tweede keer dat de tekst "banaan" voorkomt in kolom B komt er in de hulpkolom "banaan #2" te staan.

Op die manier zou je ook de vijfde keer banaan kunnen door een vlookup te doen in de hulp kolom

In D2 zet je de zoeknaam
In D3 de hoeveelste je wilt vinden (1,2 3, etc

Om dan de corresponderende waarde uit kolom C weer te geven:
In D4:=vlookup(D2 & " #" & D3,a1:z100,3)
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
abonnement Unibet Coolblue
Forum Opties
Forumhop:
Hop naar:
(afkorting, bv 'KLB')