Thema Datum  Von Nutzer Rating
Antwort
07.09.2011 12:32:32 Tobias
NotSolved
Blau Markierung von Änderungen
 07.09.2011 12:38:21 Tobias
NotSolved

Ansicht des Beitrags:
Von:
Tobias		 Datum:
07.09.2011 12:38:21		 Views:
1068		 Rating:
     
Antwort:
  Ja
Thema:
Markierung von Änderungen

sollte vielleich noch genau erwähnen wie ich auf welche variabeln komme ect.

        maxy = Workbooks(wbdokument01).Worksheets("Abteilung 2").UsedRange.Rows.Count
        maxy = maxy
        maxx = Workbooks(wbdokument02).Worksheets("Dokumentenderabteilung").UsedRange.Rows.Count
        maxx = maxx

habe Abteilung 2 zum bestimmen der rows gewählt weil es die meisten dokumente beinhaltet.

Private Sub CommandButton1_Click()
    dokument01 = ""
    Dim oFileDialog As FileDialog
    Set oFileDialog = Application.FileDialog(msoFileDialogFilePicker)
    With oFileDialog
        .Title = "Datei wählen!"
        .Filters.Clear
        .Filters.Add "Excel-Files", "*.xls;*.xlsx*"
        If .Show = True Then
            dokument01 = .SelectedItems(1)
            TextBox1 = dokument01
        End If
    End With
End Sub

Private Sub CommandButton2_Click()
    dokument02 = ""
    Dim oFileDialog As FileDialog
    Set oFileDialog = Application.FileDialog(msoFileDialogFilePicker)
    With oFileDialog
        .Title = "Datei wählen!"
        .Filters.Clear
        .Filters.Add "Excel-Files", "*.xls;*.xlsx*"
        If .Show = True Then
            dokument02 = .SelectedItems(1)
            TextBox2 = dokument02
        End If
    End With
End Sub

zum bestimmen der dokumente zum vergleich.

 

Relevant... DIE WORKSHEET NAMEN HABE ICH NICHT DURCH EINEN TEILCODE IM VBA ERMITTELT SONDERN PER HAND EINGEFÜGT

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
07.09.2011 12:32:32 Tobias
NotSolved
Blau Markierung von Änderungen
 07.09.2011 12:38:21 Tobias
NotSolved