Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Turnier// Sitzplatz und Tisch übertragen
#1
Hallo, 

ich habe hier ein Anliegen:

Die Exceldatei habe ich mir vom HERBERS Excel Forum geholt. Im MS-Office-Forum wurde mein Anliegen mit der Anwesenheit und bezahlt  geholfen.

Nun habe ich zur Aufgabe gemacht und es in Excel 2016 aufgearbeitet. Vorher war es 1997-2003.

Jetzt komme ich zum Punkt:

In der Tabelle Auswertung funktioniert die Auslosung gut. 

Wie bekomme ich die Daten (Sitzplatz und Tisch richtig zu den jeweiligen Spielern) von der Tabelle Auswertung hin zum Tabelle Ausdruck?

Ich dachte an Sverweis oder Wverweis. Ich bezeichne mich als Anfänger.


Angehängte Dateien
.xlsm   Rommeturnier2.xlsm (Größe: 56,36 KB / Downloads: 10)
Antworten Top
#2
Hallo

Deine Angaben mit Tische und Platz haben mich am Anfang sehr verwirrt. So geht das m.E. nicht.
Schau dir bitte meine Lösung an, leider eine alte Excel 2003 Datei, das Makro kannst du kopieren.

mfg Gast 123


Angehängte Dateien
.xls   Rommeturnier2 F.xls (Größe: 88 KB / Downloads: 7)
[-] Folgende(r) 1 Nutzer sagt Danke an Gast 123 für diesen Beitrag:
  • ultrabest
Antworten Top
#3
(12.06.2024, 19:24)Gast 123 schrieb: Hallo

Deine Angaben mit Tische und Platz haben mich am Anfang sehr verwirrt. So geht das m.E. nicht.
Schau dir bitte meine Lösung an, leider eine alte Excel 2003 Datei, das Makro kannst du kopieren.

mfg Gast 123

Hallo Gast 123.

Ich hatte mir schon gedacht, dass es in die andere Richtung läuft.
Dein Vorschlag ist schon mal gut. 

Ich werde mich auf darauf hinarbeiten. 

Viele Grüße
ultrabest
Antworten Top
#4
Hallo Gast 123

Ich habe das Makro eingebaut.

Bei der Auswahl von 5 Tischen funktioniert die Übertragung nur bis Tisch 4. 

Der 5.Tisch wird nicht angezeigt.

Du kannst es Dir in Ruhe anschauen.

Viele Grüße 

ultrabest


Angehängte Dateien
.xlsm   Rommeturnier3.xlsm (Größe: 62,38 KB / Downloads: 2)
Antworten Top
#5
Hallo

Sorry, Fehler bei der Ermittlung von LSp=LastSpalte.  Bitte den Befehl ändern in:
    Lsp = ASW.Range("F2").End(xlToRight).Column - 5

mfg Gast 123
[-] Folgende(r) 1 Nutzer sagt Danke an Gast 123 für diesen Beitrag:
  • ultrabest
Antworten Top
#6
(12.06.2024, 22:43)Gast 123 schrieb: Hallo

Sorry, Fehler bei der Ermittlung von LSp=LastSpalte.  Bitte den Befehl ändern in:
    Lsp = ASW.Range("F2").End(xlToRight).Column - 5

mfg Gast 123

Es funktioniert. Herzlichen Dank.

Viele Grüße 
ultrabest
Antworten Top
#7
Hallo !

Ist es möglich die Spieler in die richtige Reichenfolge zu bringen?

Spieler 1  Tisch 2/2
Spieler 2  Tisch 3/2
Spieler 3  Tisch 1/2

usw. 

Viele Grüße
ultrabest


Angehängte Dateien
.xlsm   Rommeturnier3.xlsm (Größe: 60,24 KB / Downloads: 1)
Antworten Top
#8
Hallo,

entweder beim Auswerten (VBA) die Tabelle anders aufbauen oder so wie gezeigt ergänzen.

Sehe gerade, dass du eine 2016er Version hasst, dann musst du im Makro noch die Sortierfunktion einbinden.

Gruß Stephan


Angehängte Dateien
.xlsm   Rommeturnier3.xlsm (Größe: 53,46 KB / Downloads: 5)
[-] Folgende(r) 1 Nutzer sagt Danke an Stephan für diesen Beitrag:
  • ultrabest
Antworten Top
#9
(21.06.2024, 16:55)Stephan schrieb: Hallo,

entweder beim Auswerten (VBA) die Tabelle anders aufbauen oder so wie gezeigt ergänzen.

Sehe gerade, dass du eine 2016er Version hasst, dann musst du im Makro noch die Sortierfunktion einbinden.

Gruß Stephan

Hallo Stephan.

Ich habe es mal ausprobiert.

Bei mir funktioniert das nicht.

Ich habe Excel 2016 am Laufen.

Gruß
ultrabest


Angehängte Dateien
.xlsm   Rommeturnier3a.xlsm (Größe: 52,64 KB / Downloads: 0)
Antworten Top
#10
Hallo,
 du hast aber eine funktionierende Makroversion.
Dort fügst du im Makro 'Auswertung' nach

Next AC
    Next s
    Columns("D:E").Sort Key1:=Range("E2"), Header:=xlYes 

ein. 

Bei den anderen beiden Serien entsprechend 

  Columns("F:G").Sort Key1:=Range("G2"), Header:=xlYes

bzw.

Columns("H:I").Sort Key1:=Range("I2"), Header:=xlYes

ein.

Dann hast du die geordente Ausgabe.

Gruß Stephan
[-] Folgende(r) 1 Nutzer sagt Danke an Stephan für diesen Beitrag:
  • ultrabest
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste