Print side | Luk vindue

Turneringsliste

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=1041
Udskrevet den: 17.Maj.2024 kl. 10:19


Emne: Turneringsliste
Besked fra: Gusbaby
Emne: Turneringsliste
Posteringsdato: 18.Jan.2013 kl. 16:56
kan det ikke lade sig gøre at lave en makro der kan vælge vilkårlig persones ud fra en rangliste
altså en vilkårlg tuneringsliste uf fra medlemmer.( de har Medlems nummer) og vinderne gå vidre og der laves en ny liste ud fra vinderne indtil der stå to mand tilbage..Wink
håber du har en løsning på dette.
Jeg har en ranglistec og fra den skal der blandes en liste til tunering
og igen en liste af vinderne der går vidre i næste pulje
mangler en kode der kan finde vilkårlig spiller ud fra liste
Eks.
 
A                               B                                C                                   D                         E
Medlems Nr               Navn                         Rangliste                     Tunering                 Vinder
10                      ib                                  1                                 eks  1-4                      1
15                      bo                                 2                                        6-3                       6
1                        per                                3                                        5-2                       2
3                        ole                                 4                                       osv                      10
4                        alf                                 5                                         
17                      Åse                                6                              
osv                     osv                                osv         
MVH



Svar:
Besked fra: excelent
Posteringsdato: 19.Jan.2013 kl. 10:40
uploads/248/Tilfældig_2.xls" rel="nofollow - uploads/248/Tilfældig_2.xls
Prøv om du kan bruge denne, eller evt. tilrette den.
 
 


-------------
Jeg anvender Excel 2016 DK. Hvad anvender DU ? HUSK TILBAGEMELDING !!!


Besked fra: Gusbaby
Posteringsdato: 19.Jan.2013 kl. 11:03
Kanon lige havad jeg manglede i er virkelig rigtige gode i det her forum
WinkClap du har lavet vores problem
Tusinde tak


Besked fra: Gusbaby
Posteringsdato: 19.Jan.2013 kl. 11:34
Hej
Jeg har et lille problem med det du har lavet...
Kan du fortælle mig hvordan man får den til at føre alle på listen til kolonne J
når du har blandet, lige nu tager den kun nogle eller havldelen.
Jeg er ikke en haj til det der. Håber du vil hjælpe.
På Forhånd tak
 


Besked fra: excelent
Posteringsdato: 19.Jan.2013 kl. 11:59
Den flytter/overfører lige så mange som du har valgt i destinations-range
Klik på den lille grå firkant til højre i feltet Destinations område,- marker så i arket så mange celle som du vil have indsat spillere.
 
BEM. du kan holde musemarkør over de forskellige formularer på formen, s¨får du en lille hjælpetekst.


-------------
Jeg anvender Excel 2016 DK. Hvad anvender DU ? HUSK TILBAGEMELDING !!!


Besked fra: excelent
Posteringsdato: 19.Jan.2013 kl. 12:01
Du bestemmer altså selv via markering hvor og hvor mange der skal indsættes

-------------
Jeg anvender Excel 2016 DK. Hvad anvender DU ? HUSK TILBAGEMELDING !!!


Besked fra: Gusbaby
Posteringsdato: 19.Jan.2013 kl. 15:19
Super tak for det. Det er en stor hjælp for os.
jeg har fundet ud af løsningen.
 
Godt gået


Besked fra: excelent
Posteringsdato: 19.Jan.2013 kl. 15:47
Velbekom

-------------
Jeg anvender Excel 2016 DK. Hvad anvender DU ? HUSK TILBAGEMELDING !!!


Besked fra: excelent
Posteringsdato: 19.Jan.2013 kl. 15:52
Husk du kan vælge opstarts range når du åbner formen i formens Initialize modul
 
Private Sub UserForm_Initialize()
Me.kilde = "Ark1!$A$4:$A$11" 'Hvis du vil have at formen starter op med forvalgt range -
Me.dest = "Ark1!$J$5:$J$8" ' ret evt. til aktuel i begge linier
End Sub
 


-------------
Jeg anvender Excel 2016 DK. Hvad anvender DU ? HUSK TILBAGEMELDING !!!


Besked fra: Gusbaby
Posteringsdato: 20.Jan.2013 kl. 13:59
Hej igen
Hvis jeg vil ombøbe ark1 hvor skal jeg så lave det om i kode?
Jeg vil gerne have ark1 til at hedde Lav Tunering
 


Besked fra: excelent
Posteringsdato: 20.Jan.2013 kl. 14:47
kun her :
 
Private Sub UserForm_Initialize()
Me.kilde = "'Lav Turnering'!$A$4:$A$11" 'Hvis du vil have at formen starter op med forvalgt range -
Me.dest = "'Lav Turnering'!$J$5:$J$8" ' ret evt. til aktuel i begge linier
End Sub
 
OBS: når arknavn består af 2 eller flere ord med mellemrum, så skal der indsættes et par ' ' som vist her


-------------
Jeg anvender Excel 2016 DK. Hvad anvender DU ? HUSK TILBAGEMELDING !!!


Besked fra: excelent
Posteringsdato: 20.Jan.2013 kl. 14:51
og de hedder  apostrof som jeg ikke lige kunne huske stavemåden på Geek

-------------
Jeg anvender Excel 2016 DK. Hvad anvender DU ? HUSK TILBAGEMELDING !!!


Besked fra: Gusbaby
Posteringsdato: 20.Jan.2013 kl. 22:25
Takker igen hr
det virker. Super Super


Besked fra: excelent
Posteringsdato: 21.Jan.2013 kl. 11:40
velbekom :-)

-------------
Jeg anvender Excel 2016 DK. Hvad anvender DU ? HUSK TILBAGEMELDING !!!



Print side | Luk vindue