Erstellen Sie eine Baumansicht

Ich möchte eine Baumansicht mit folgenden Angaben erstellt erhalten

EDIT: FYI: thomach Code versucht, das Hinzufügen und dann Zitat-Tags zu sehen, ob das Einrücken zeigte. Weder gearbeitet.







I # habe versucht, mein Bestes eine Verzeichnisstruktur mit VBA und Excel zu erstellen, und haben die Geduld, wie am besten laufen, dies zu tun. Mein Ziel ist es, einen Verzeichnisbaum mit 2 Ebenen zu erstellen. Die erste Ebene (Hauptordner) wird aus den Daten in Spalte A von einer Excel-Tabelle genannt werden, die zweite Ebene (Unterordner) wird aus den Daten in den Spalten B, C und D der Tabelle erstellt werden. I # habe den folgenden Code mit Erfolg benutzen, aber don # 't weiß, wie Verzeichnisse zu erstellen:

Sub StartHere ()
Dim rCell As Range, rRng As Range
Set rRng = Sheet1.Range ( "A1: A20")
For Each rCell In rRng.Cells
Create rCell.Value, "C: est"
Weiter rCell
End Sub

Sub Create (sSubFolder As String, ByVal sBaseFolder As String)
Dim sTemp As String
# 'Stellen Sie sicher, dass die Basisordner ist bereit, einen Unterordner haben
# 'Geheftet auf das Ende
Wenn Right (sBaseFolder, 1) <> "" Dann
sBaseFolder = sBaseFolder - ""
End If.

Ich war diese Datei und ich möchte geschickt auf der linken Seite die Stückliste Baumstruktur replizieren. I # bin nicht sicher, wie es gemacht wird.

Wie kann ich die folgende Umwandlung machen:

(Spaltenwerte werden durch = getrennt)

I # 'd schätzen, wenn jemand ein Makro dafür schaffen helfen kann. Dies könnte eine lange Liste hat und einen längeren Baum auch.

wie ein zusammenklappbaren Baum in Excel mit VBA erstellen.

Hinweis: Es Einschränkung ist, dass ich nicht ActiveX verwenden kann

Ein kleines Beispiel sehr nützlich sein wird.

Ich versuche, ein Blatt zu erstellen Baumstruktur von Zeilen zu ähneln. Das ist standardmäßig alle übergeordneten Zeilen sichtbar sein muss und klicken Sie auf der + Zeichen, sollte die Reihe erweitern ihre untergeordneten Zeilen zu zeigen, die wiederum untergeordneten Zeilen, aber erscheinen brach zusammen. Wenn ich zwei Reihen wählen und klicken Sie auf Gruppen, und wählen Sie Zeilen, sehe ich eine Gruppierung, aber wenn ich versuche, mit dem Zusammenbruch - Zeichen, die beide zwei Zeilen deaktiviert wird. Ich mag die erste Zeile als Eltern und zweite Reihe als Kind machen. Wie mache ich es?

Ich versuche, eine Tasse Baum zu bauen, die automatisch die Spieler auf die nächste Runde bewegen, wenn sie erste oder zweite sind in
ihre Gruppe von 4. Was passiert, wenn die erste Person, die ein Ergebnis haben von 33 können sagen und 2. und 3. Person haben ein Ergebnis von 35 jeden und die 4. Person 37? Erste Person ist einfach, aber dann gibt es 2 Personen mit dem Ergebnis, sam, und sie spielen plötzlichen Tod, und wir setzen in einer 1 in der sd Spalte für den Gewinner und eine 2 für die Verlierer des plötzlichen Todes.

Wie kann ich meine Formel Figur machen, dass, wenn sie auf der SD-Säule das gleiche Ergebnis gehen aussehen haben?

Eine andere Sache ist, dass der 2 Spieler vorrückenden sie in der gleichen Reihenfolge, in der nächsten Runde platziert werden müssen, wie kann ich das erreichen?

Wenn Sie in der Spalte aussehen Zeile I 19-22 es Spieler in der falschen Reihenfolge sind, weil der Spieler mit dem besseren Ergebnis zuerst eingezogen wird. Es sollte diese Reihenfolge: 9 11 15 16 statt. (Wenn Sie im Voraus in der vorherigen Runde sind, werden Sie in der nächsten Runde voraus)

Ein weiteres Problem, das ich jetzt aufgefallen ist, dass, wenn zwei Spieler das gleiche hat die niedrigste Punktzahl der erste Spieler beiden Punkte nimmt, wie es jetzt ist, und dass doesn # 't Arbeit in real. Sie sehen, was ich meine, wenn man sich Spieler 1 in Runde aussieht 1 und 2 (R1 - R2), in diesem Fall ist es die Spieler haben sollte gewesen 1 2 6 und 7 bewegen auf 2 abzurunden und nicht 1 1 6 7, wie es in ist der Moment.

(Rang ist ihr Rang von den qulification Runden, wo die ersten 4 seeded und der Rest wird in 1-Gruppe einer Zeit gezeichnet)

I7
= IF (# 'Klass B Berechnungen #' F4 = 1; #! 'Klass B Berechnungen #' C4; if (! # 'Klass B Berechnungen #' F5 = 1;! # 'Klass B Berechnungen #' C5;
IF (# 'Klass B Berechnungen #' F6 = 1; #! 'Klass B Berechnungen #' C6; WENN (# 'Berechnungen Klass B #' F7 = 1;! # 'Klass B Berechnungen #' C7; "" ))))

I # ‚m versuchen, einen Makro zu schreiben, die einen Baum aus drei Sätzen von Listen und I # bauen‘ m wirklich stecken !.
Die Sache ist:

1. Ich habe 1 Arbeitsblatt mit 2 Blatt. Erstes Blatt „Listen“ enthalten in jeder Spalte eine Liste von Daten.

2. Range ( "B: C") enthält Liste od SERVICES1 - jeder Wert in der Liste hat seine entsprechende ID_SERVICES.

3. Range ( "D: F") enthält Liste od SERVICES2 - jeder Wert in der Liste seine entsprechende ID_SERVICES2 und eine übergeordnete ID ID_SERVICES.

4.Range ( "H: I") enthält Liste od Dienstleistungen3 - jeder Wert in der Liste hat seine ID_SERVICES3 und eine Eltern-ID ID_SERVICES2 entspricht.

5. zweites Blatt "Projekt" in Range ( "A: C") enthält Beispiel Bäume wie.

Ich habe eine Datenvalidierungsliste in B31 "Materialart", die 4 Optionen (Adhesives, Metalle, Backer Board - Grout) hat. Auf der Grundlage dieser Auswahl F31 muss eine Liste von „Beschreibungen“ anzuzeigen, dass „Materialart“ entsprechen. Die Liste ist in Buch "database.xls! Sheet3". Materialart Liste Spalte A ist, Beschreibung ist in Spalte E. Ich weiß, dass Sie # 't Link zu einer nicht geöffneten Arbeitsmappe in Datenvalidierung - I # habe versucht, es zu codieren, aber auch hier der Mangel an expierence - Wissen hat Dieser Code P die Informationen für die Datei zu erhalten zu öffnen: frustriert mich wieder







Privat Function GetValue (Pfad, Datei, Blatt, ref)
Dim arg As String
Wenn Right (Pfad, 1) <> "" Dann path = Pfad - ""
Wenn Du (Pfad - Datei) = "" Then
GetValue = „Datei nicht gefunden“
Exit-Funktion
End If
arg = "# '" - Pfad - "[" - Datei - "]" - Blatt - "#'!" - _
Range (ref) .Range ( "A1"). Adresse (. XlR1C1)
GetValue = ExecuteExcel4Macro (ARG)
End Function.

Ich begegne das folgende Problem, das mich seit Wochen nervt.

Ich mache eine Engineering-Tabelle nach oben, das die elektrischen Kabelgröße von Knoten A berechnet B. den Knoten

Col A und B geht so:

So Transformer ist die Mutter von MSB_A und MSB_A ist wiederum die Eltern von SSB_A1 und so weiter.

Was würde Ich mag zu erreichen ist es, diese Daten in die folgende Konfiguration zu setzen:

Transformator -----> MSB_A
. | -> SSB_A1
. | -----> DB_A1

Transformator -----> MSB_B
. | -> SSB_B1
. |. -----> DB_B1

NB: Bitte ignorieren Sie die „Punkte“ oben.

Dies gibt dem Anwender einen Überblick über die Eltern und Knoten Beziehung geben.

Ich kann # 't scheinen, eine Lösung zu finden, wie dies zu erreichen.

Ich habe eine Organisationshierarchie Dump in Excel aus einem SAP-ERP-System. Das Format der Datei ist kleiner als benutzerfreundlich und ich brauche es zu einem Flat-File-Format zu konvertieren, so dass ich schwenkt dagegen tun kann oder möglicherweise es in Access-Datenbank-Dump. Der Hintergrund ist wie folgt (ich auch eine Datei bin Befestigung).

Die Organisationsstruktur ist multinoded / schichtet. Top meisten Knoten ist ein Unternehmen aus der zweiten Topligen von 02DivName bezeichnet jede 02DivName hat mehrere Knoten zugeordnet. Die unterste Ebene der Hierarchie ist eine Abteilung, immer numerisch, immer gleich lang.

Das # ist, wo es interessant wird. Jeder Knoten / Schicht unter 02DivName hat eine technische Beschreibung und Textbeschreibung sie in zwei verschiedenen Spalten aufgeteilt werden, wenn SAP sie Dumps. Technische Beschreibungen können verwendet werden, um festzustellen, wo in der Hierarchie der Knoten fällt (Eltern / Kind). Zum Beispiel 02A ist ein Kind von 02DivName 02B ist ein Kind von 02A 02C ein Kind von 02B ist und natürlich alle von ihnen zu 02DivName aufrollen. Es könnte mehrere 02A # 's unter Div Namen und ihre jeweiligen 02B #' sein s, C # 's D #' s unter ihnen rollen würde. Also auf Exportdatei wäre es grafisch dargestellt 02A1 blank blank in dieser Spalte und dann auf 02A2 ihrem jeweiligen 02B # ändern s und D # 's ‚s würde in verschiedenen Spalten gleich sein für C # funktioniert‘.

Hier ist ein weiteres Falten die Abteilung nicht immer auf der untersten Ebene Gruppierung zugeordnet ist. Ich konnte 02DivName Abteilung haben, abt, abt, und dann die Gruppe 02A bis 02DivName zugeordnet. Die Abteilungsnummern bis auf Exportdatei in der gleichen Spalte wie fre Form Textbeschreibungen für die Knoten beenden. Es ist gestaffeltes Format.

Das Ziel das, was ich # ist versucht, im Grunde zu tun ist, das Kauderwelsch oben in flaches Dateiformat über ein VBA-Skript beschrieben konvertieren. Ich brauche node1 node1 ab Knoten2, Knoten2 desc haben, etc etc in Spalten die letzte Spalte einer Abteilung Zahl ist. Also, wenn ich zum Beispiel alle zugewiesen eine Abteilung habe direkt an 02DivName direkt die anderen Knotenbeschreibungen werden leer sein, wenn sie # 's Knoten 02A dann die node1 und Knoten2 werden aufgefüllt werden. Jede Hilfe wird sehr geschätzt. Und hier ist die Datei mit Excel-Tabelle

wenn es # 's eine Möglichkeit, entweder festlegen, welche Spalten oder Zeilen sind bedruckbar oder irgendwie Spalten zu lassen (oder Zeilen) als sichtbar im Druckbereich aber weggelassen vom Druck, als ob sie versteckt waren.

In meinem CAD-Paket kann ich einfach bestimmte Sammlungen von Informationen „nicht druckbare“ zu haben, wähle, ist es eine Möglichkeit, dies mit Spalt tun können, ohne auf den Menschen angewiesen zu mühsam (sic) verstecken und sichtbar machen Spalten auf beiden Seiten des Drucks Verwaltung ein Dokument.

I # habe ein kleines wenig excell Programm entwerfen, das eine Form und versteckt die Excel-Arbeitsmappe beim Öffnen bringt. Durch die Verwendung der Form ist der Benutzer auf ein Arbeitsblatt zur Eingabe von Daten in der Lage im Hintergrund ausgeführt wird. I # habe eine Schaltfläche auf dem Formular hinzugefügt, wo ich möchte der Benutzer das Arbeitsblatt in der Lage sein zu öffnen, das Passwort geschützt ist und die Daten anzuzeigen oder zu drucken. I # 'bereits habe den Code bekam die Arbeitsmappe zu verstecken, zu schützen und die Blätter ungeschützt, kann ich nur scheint den Code zu erhalten, die ein Arbeitsblatt anzuzeigen.

Im Einklang mit ihrem Monopol auf Code, hat Microsoft, natürlich gesperrt alle enthaltenen XL-Add-In (der Code Teil).

Ich war daran interessiert, schauen, wie einige dieser Add-Ins funktioniert, wie es scheint ziemlich lehrreich sein könnte.

wie die Module zu entsperren, die mit XL # 's Add-In kommen?

Ich frage mich, wie kann ich alles, außer für das Arbeitsblatt zu verstecken bekommen treffen, sobald es beginnt und legte sie dann alle wieder, wenn Sie verlassen.

Ich verwende einige geschützte Arbeitsmappen und kann nicht auf die Registerkarten am unteren Rand des Bildschirms sehen.

Ich habe versucht, gehen zu Tools / Optionen / etc

Ich habe versucht, Vollbildanzeige

Wenn ich das aktuelle Blatt 1 und fügen Sie ihn in eine neue Arbeitsmappe kopieren kann ich dann sehen Registerkarten (aber nur Blatt 1 hat Daten kopiert).

Ich benutze einen zwei Setup-Monitor von einer Radeon 9550 Grafikkarte angetrieben, aber das Problem, das ich tritt auch auf einem einzigen Monitor habe. Wenn ich mehrere Arbeitsmappen oder Arbeitsblätter öffnen kann ich nur einer nach dem anderen sehen die anderen Reste hinter dem geöffneten Fenster eingebettet. Nichts, was ich kenne, wird mir beide zur gleichen Zeit sehen lassen.

Ive auf jemandem gesehen Elses Arbeitsmappe die ersten 6 Spalten festgelegt sind (immer im Blick), dann können Sie immer noch über scrollen aber die ersten sechs Spalten immer im Blick bleiben.

ich tat etwas in Extras -> Optionen -> Ansicht - plötzlich die Termine in meinem Blatt verschwunden - einige Zahlen kamen, kann ich das Datum in der Bearbeitungsleiste anzeigen, aber # 't in der Zelle betrachtet werden, - i ist auch nicht in der Lage, die Ausrichtung für die Zelle zu tun.

siehe WB angebracht.

Bevorzugte Lösung nur nur Noten Formeln.

Ich bin # stuyding das Buch ‚Professional Excel Development‘, die eine Projektvorlage und ein AddIn mit mehreren Modulen und einem Arbeitsblatt hat. Ich kann die Addin # ‚s Module aber nicht #‘ s Ansicht Arbeitsblatt - ist das normal für Addin # 's? I haven # 't arbeitete mit ihnen viel vor.

Haben Sie Probleme beim VB Einstellung Fenster mit Blick auf deafult zurück.

i # bin Probleme mit meinem Makro haben, und versucht, die Zeichenfolge in einem msgbox zu sehen, aber Probleme dabei haben:

Wie kann ich strSourcePathname in einem MSGBOX?

Code:
Sub Copypaste ()
Dim strSourcePathname As String, Bericht Als Arbeitsmappe
Dim ws1 Wie Arbeitsblatt, WS2 Als Arbeitsblatt, ws3 Als Arbeitsblatt

Beim Erstellen von Blattdaten und Herstellung Pivot-Tabelle

Wenn ich Sie rechts klicken Sie auf die Pivot-Blatt

Der „Code anzeigen“ deaktiviert

Ich versuche, diesen Code zu verwenden, um die Arbeitsmappe (WK) in der Userform genannt WK anzuzeigen

es kann nicht reconize .spreadWK

Private Sub UserForm_Initialize ()
Me.SpreadWK.Cells.Range. ( "A1: E10") Wert = ThisWorkbook.Worksheets ( "WK") Bereich.. ( "A1: E10") Wert
End Sub
dies ist jedoch zu sagen, dass es nicht reconize kann
.spreadWK

Ich habe diese Datentabelle, wo die Gesamtwerte in der letzten (unteren) row.The Anzahl der Zeilen der Tabelle erhöht sind als neuer Datensätze zu dem Boden der Tabelle hinzugefügt werden. Nun ist das Problem. Ich brauche die Reihe zu haben, die die Summen alwas auf Sicht enthält, egal wie groß der Tisch bekommt und egal, wie weit nach unten / oben die workshhet gescrollt wird.

Ich habe versucht, Fenster fixieren / Spliting das Hinzufügen neuer Fenster. Live-Formen usw., aber alle sehen vertrackt und ihre eigenen Probleme bringen.

Ich habe auch gedacht, um an der Spitze des Arbeitsblatts in einer Reihe der Summen der Tabelle setzen und die Scheiben an dieser Stelle eiskalt, aber die Summen, die am unteren Ende der Tabelle zeigen, ist die normale intuitive Art und Weise.







In Verbindung stehende Artikel