deze was wel heel erg makkelijkquote:Op dinsdag 12 februari 2013 16:03 schreef qu63 het volgende:
[..]
Of op deze manier: http://www.pcmag.com/article2/0,2817,1785247,00.asp
Lang leve googlequote:Op dinsdag 12 februari 2013 16:43 schreef RanTheMan het volgende:
[..]
deze was wel heel erg makkelijk
1 2 3 4 5 | [ ][ A ][ B] [1 ] 1 [3 ] [2 ] 2 [1 ] [3 ] 3 [2 ] ... |
??quote:Op woensdag 13 februari 2013 11:36 schreef Janneke141 het volgende:
Maak een hulpkolom met willekeurige getallen [ =ASELECT() ] en sorteer ze op die kolom?
Ik 'ruik' hierin mogelijkheden. Ik ga er even mee stoeien. Thnx alvast.quote:Op woensdag 13 februari 2013 11:42 schreef Janneke141 het volgende:
Wat je wil kan niet in één formule, maar wel met een paar handelingen. Je mag er een macro voor schrijven als je dat leuk vindt, maar dit is wat je doet:
- Kopieer je getallen 1..150 naar kolom B.
- in C1 zet je de formule =ASELECT(). Deze genereert een willekeurig getal tussen 0 en 1 met een stuk of 12 decimalen.
- Kopieer de formule naar C2..C150.
- Selecteer nu de cellen B1..C150 en sorteer op kolom C. De getallen in kolom B staan nu in willekeurige volgorde.
- Verwijder de inhoud van kolom C.
Dat kan snellerquote:Op woensdag 13 februari 2013 11:42 schreef Janneke141 het volgende:
Wat je wil kan niet in één formule, maar wel met een paar handelingen. Je mag er een macro voor schrijven als je dat leuk vindt, maar dit is wat je doet:
- Kopieer je getallen 1..150 naar kolom B.
- in C1 zet je de formule =ASELECT(). Deze genereert een willekeurig getal tussen 0 en 1 met een stuk of 12 decimalen.
- Kopieer de formule naar C2..C150.
- Selecteer nu de cellen B1..C150 en sorteer op kolom C. De getallen in kolom B staan nu in willekeurige volgorde.
- Verwijder de inhoud van kolom C.
Niet als je geen doublures wil toch?quote:Op woensdag 13 februari 2013 12:20 schreef qu63 het volgende:
[..]
Dat kan sneller
Gebruik ASELECTTUSSEN(1;150) en zit dit in B1:B150 en je bent klaar
Hmm, fair point..quote:Op woensdag 13 februari 2013 12:21 schreef Janneke141 het volgende:
[..]
Niet als je geen doublures wil toch?
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | T=taak [ ][A][B][C][D][E][F] [1][ ][1][2][3][4][5] (weken) [2][T1] [3][T2] [4][T3] [5][T4] [6][T5] [7][T6] [8][T7] [9][T8] [11][naam1] [12][naam2] [13][naam3] [14][naam4] [15][naam5] [16][naam6] [17][naam7] [18][naam8] |
Nee, geen dubbellenquote:Op woensdag 13 februari 2013 13:18 schreef Z het volgende:
Nee dat. Maar er kunnen dus een paar dubbele tussen zitten?
Ja,volgens mij wel.Maar hoe doe je dat?quote:Op woensdag 13 februari 2013 14:18 schreef Z het volgende:
Dat is toch een kwestie van 40 (8 x 5) cellen random verdelen over de 8 namen?
Graag met een druk op de knop. Aangezien de hele sheet nogal aan verandering onderhevig is.quote:Op woensdag 13 februari 2013 14:31 schreef Z het volgende:
Wil je dat met een druk op de knop of in een paar stappen? In een paar stappen kan je de namen als uitgangspunt nemen en daar random per week de taken over verdelen toch?
Stel in kolom A (vanaf A2) staat je artikelomschrijving, in kolom B (vanaf B2) je actuele voorraad en in kolom C je minimale voorraad. In kolom D typ je de uitgiftewaarde in en doet op de knop drukken.quote:Op donderdag 14 februari 2013 08:19 schreef sloopkogel het volgende:
Ik zit met een excel probleem waar ik maar niet uit kom.
Ik heb het grotendeels al voorelkaar maar een aantal zaken niet:
Het zou als volgt moeten gaan: Als ik bij uitgifte een getal invoer en ik klik op de button "verwerken" dan zou hij dat getal moeten aftrekken van de huidige voorraad en het kolom van "uitgifte" moet dan weer leeg zijn.
Kom je onder de minimum voorraad dan zou er in kolom K en L "bestellen" moeten komen te staan.
Ik hoop dat iemand mij hier mee kan helpen.
Ander probleem is dat ik op mijn werk zit en alles is nogal redelijk afgeschermd dus ik kan deze file niet zomaar even ergens sharen.
Ik kan het wel via email doen.
Iemand die mij wil helpen?
THANX!!
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 | Sub uitgeven() Dim iUit As Integer Dim iVoor As Integer Dim iMin As Integer Dim iRest As Integer If ActiveCell.Column <> 4 Then MsgBox "Selecteer cel in kolom D met uitgifte waarde" Exit Sub End If iUit = ActiveCell.Value iMin = ActiveCell.Offset(0, -1).Value iVoor = ActiveCell.Offset(0, -2).Value omschrijving = ActiveCell.Offset(0, -3).Value iRest = iVoor - iUit Select Case iRest Case Is < 0 MsgBox "Je hebt te weinig voorraad voor deze uitlevering (" & iUit & " stuks)" Exit Sub Case 0 MsgBox "Je nieuwe voorraad is 0, direct nieuwe bestellen" Case Is <= iMin MsgBox "Je komt na uitleveren onder je minimale voorraad, direct bestellen" End Select 'bevestigen btnCheck = MsgBox("Wil je " & iUit & " stuks van materiaal " & omschrijving & " uitgeven?", vbYesNo) If btnCheck = vbNo Then Exit Sub 'voorraad aanpassen ActiveCell.Offset(0, -2).Value = iRest ActiveCell.Select Selection.ClearContents MsgBox ("Uitgifte is verwerkt") End Sub |
Ik heb je een prive-bericht geschrevenquote:Op donderdag 14 februari 2013 08:59 schreef Deetch het volgende:
En in kolom K en L zet je de functie: =if(b2<=C2, "BESTELLEN")
en beantwoordquote:Op donderdag 14 februari 2013 09:38 schreef sloopkogel het volgende:
[..]
Ik heb je een prive-bericht geschreven
Forum Opties | |
---|---|
Forumhop: | |
Hop naar: |