Plan fuer Hausordnung?
Klaus Metz
ich moechte mit Excel 8.0 einen Plan fuer die Hausordnung fuer mehrere
Haeuser erstellen.
Gegeben:
Tabelle mit den Spalten Name, Strasse, Etage
Nun suche ich nach einer Moeglichkeit, folgendes zu erreichen:
Excel zaehlt die Bewohner eines Hauses und erstellt je Haus eine neue
Tabelle mit den Spalten Kalenderwoche, Datum von/bis, Name, Etage
Dabei muss die Auflistung der Bewohner sich staendig in der vorgegebenen
Reihenfolge (Sortierung nach Etage) wiederholen.
Da sich dieser Ablauf fuer ca. 1500 Haeuser wiederholen muesste, will ich
"Handarbeit" moeglichst vermeiden.
Hat jemand eine Idee, wie man das loesen koennte?
Mit heissestem Dank im voraus
Klaus Metz
--
Hans W. Herber
das ist zwar durchaus machbar, aber hier reichen die Informationen nicht
aus. Wenn Du schreibst "neue Tabelle", was meinst Du? Tabellenblatt oder
Arbeitsmappe? Da Du aus Speichergründen keine 1500 Blätter in einer
Arbeitsmappe unterbringen kannst, sollte man von Arbeitsmappen ausgehen.
Was heißt "von/bis" / "Kalenderwoche"? Was ist der Zeitraum? Jahr?, Monat?
Das Problem ist zu komplex, um ohne Vorlage ins Blinde zu arbeiten. Benötigt
werden das Muster der Ausgangstabelle und der Zieltabelle. Alles in allem
eine schon eher kommerzielle Anwendung.
hans
########################################################
# Herber's Excel-Server - letztes Update: 02.12.98 #
# http://www.herber.de - Microsoft MVP - Excel #
# Neu: Die Mailingliste jetzt mit Demo-Dateien #
########################################################
--
Klaus Metz <klaus...@gmx.de> wrote in message
OrzkujhH#GA....@uppssnewspub04.moswest.msn.net...
Roger Friederich
wrote:
>
>Hat jemand eine Idee, wie man das loesen koennte?
>
Hallo Klaus,
prinzipiell ist das mit Excel möglich. Allerdings begehst Du den
Fehler, der m.E. am häufigsten mit XL gemacht wird: Excel ist kein
Datenbankprogramm und spätestens bei Deinen Vorstellung ist die
Datenbankfunktionaliät von XL ungeeignet dafür. Mit ungeeignet meine
ich, daß sich dieses Problem in Access locker in der halben Zeit
erledigen läßt und die Lösung schneller, eleganter und flexibler sein
wird.
Ich rate Dir also, Dir jemanden mit Access-Kenntnissen zu suchen und
ihn für eine kommerzielle Lösung zu bezahlen.
Gruß,
Roger
Klaus Metz
>Hallo Klaus,
Hallo Hans, hallo Roger,
>das ist zwar durchaus machbar, aber hier reichen die Informationen nicht
>aus. Wenn Du schreibst "neue Tabelle", was meinst Du? Tabellenblatt oder
>Arbeitsmappe? Da Du aus Speichergründen keine 1500 Blätter in einer
>Arbeitsmappe unterbringen kannst, sollte man von Arbeitsmappen ausgehen.
Ich hatte eigentlich an Tabellenblaetter gedacht (wegen dem Ausdruck der
Hausordung), aber es koennen auch Arbeitsmappen sein.
>Was heißt "von/bis" / "Kalenderwoche"? Was ist der Zeitraum? Jahr?, Monat?
Der Zeitraum soll sich ueber das Jahr 1999 erstrecken, von der 1. bis zur
52. Kw. Unter "von/bis" soll der Zeitraum nur nochmal als Datum
aufgeschluesselt werden.
>Das Problem ist zu komplex, um ohne Vorlage ins Blinde zu arbeiten.
Benötigt
>werden das Muster der Ausgangstabelle und der Zieltabelle. Alles in allem
>eine schon eher kommerzielle Anwendung.
Es sitzt bereits eine Firma an diesem Problem. Leider bisher ohne Ergebnis
und die Zeit fraengt ja inzwischen. Habe daher selbst versucht, wie weit ich
komme. Mit einem Makro bin ich ja schon soweit, dass mir Excel jeweils von
einem markierten Haus die Mieter hinter einer Tabelle mit den Kw's 1-52
verteilt. Nur habe ich es noch nicht geschafft, Excel dazu zu bringen,
automatisch bei den naechsten Haeusern weiterzumachen.
Ausgangstabelle:
Name; Strasse; Etage
Mustermann; Musterstr. 1; EG
Musterfrau; Musterstr. 1; 1. OG
usw.
Zieltabelle:
1. Kw 04.-10.01.99 Mustermann, EG
2. Kw 11.-17.01.99 Musterfrau, 1. OG
3. Kw 18.-25.01.99 Mustermann, EG
usw.
>hans
>########################################################
># Herber's Excel-Server - letztes Update: 02.12.98 #
># http://www.herber.de - Microsoft MVP - Excel #
># Neu: Die Mailingliste jetzt mit Demo-Dateien #
>########################################################
Hans W. Herber
mal vorausgesetzt, daß eine Arbeitsmappe "Plan.xls" mit einem Tabellenblatt
besteht, das in Spalte A die KW, in Spalte B den ersten und in Spalte C den
2. Wochentag enthält und die Arbeitsmappe mit den Gesamtdaten nach
Hausadresse adressiert ist, folgender Code:
Sub PlanAnlegen()
Dim TB As Worksheet
Dim i%, y%, n%, lR%, sR%, f%
Dim Akt$
Set TB = Workbooks("Alle").Worksheets(1)
lR = Cells(Rows.Count, 1).End(xlUp).Row
For i = 1 To lR
f = f + 1
Workbooks.Open "Plan.xls"
sR = i
Akt = TB.Cells(i, 2)
Do Until TB.Cells(i, 2) <> Akt
i = i + 1
Loop
n = sR
For y = 1 To 52
Cells(y, 4) = TB.Cells(n, 1)
n = n + 1
If n = i Then n = sR
Next y
i = i - 1
ActiveWorkbook.SaveAs "Haus" & f
ActiveWorkbook.Close
Next i
End Sub
Mit privater Post die beiden Arbeitsmappe als Demo.
hans
########################################################
# Herber's Excel-Server - letztes Update: 06.12.98 #
# http://www.herber.de - Microsoft MVP - Excel #
# Neu: Die Mailingliste jetzt mit Demo-Dateien #
########################################################
--
Klaus Metz <klaus...@gmx.de> wrote in message
eVeufeRI#GA....@uppssnewspub05.moswest.msn.net...