1. Weiterleitung zu NetzLiving.de
  2. Forum
    1. Unerledigte Themen
  3. zum neuen Forum
  • Anmelden
  • Suche
Dieses Thema
  • Alles
  • Dieses Thema
  • Dieses Forum
  • Seiten
  • Forum
  • Erweiterte Suche
  1. Informatik Forum
  2. Webmaster & Internet
  3. Entwicklung

VBA-Tutorial

    • Suche
  • Adok
  • 12. Juni 2006 um 22:01
  • Unerledigt
Hallo zusammen,

das Informatik-Forum geht in den Archivmodus, genaue Informationen kann man der entsprechenden Ankündigung entnehmen. Als Dankeschön für die Treue bekommt man von uns einen Gutscheincode (informatikforum30) womit man bei netzliving.de 30% auf das erste Jahr sparen kann. (Genaue Infos sind ebenfalls in der Ankündigung)

Vielen Dank für die Treue und das Verständnis!
  • Adok
    Punkte
    4.199
    Beiträge
    714
    • 12. Juni 2006 um 22:01
    • #1

    Hi,

    wer kann mir ein gutes Tutorial für Visual Basic for Applications empfehlen? Ich würde gerne ein einfaches Makro für MS Word schreiben; mir ist aber nicht ganz klar, wie ich Tabelleneinträge (Zellen, Zeilen) manipulieren sowie löschen kann.

  • NoUse
    Punkte
    425
    Beiträge
    67
    • 13. Juni 2006 um 09:41
    • #2

    Ich find für sowas die Office-Hilfe am aufschlussreichsten. Man muss halt vermuten können, wie das heißen kann, aber bei Tabellen etc. sollt das gehen:

    Code
    ActiveDocument.Tables(1).Cell(1, 1).Range = 1

    Weist der ersten Zelle der ersten Tabelle den Wert 1 zu. Bei den Objekten findest dann auch entsprechende Lösch-, Einfüge- und alle anderen Operationen.

  • Adok
    Punkte
    4.199
    Beiträge
    714
    • 13. Juni 2006 um 12:03
    • #3

    Danke, dein Tipp war hilfreich.

  • stormcrow
    Punkte
    360
    Beiträge
    72
    • 13. Juni 2006 um 19:38
    • #4

    was auch oft hilft bei makros is makros aufzuzeichnen. einfach haendisch machen was man machen will und sich dann den generierten code anschauen. schon weisst wie die sachen heissen und wiesd was machen kannst.

  • Adok
    Punkte
    4.199
    Beiträge
    714
    • 13. Juni 2006 um 22:41
    • #5

    Nun, mein Code scheint syntaktisch korrekt zu sein, allerdings terminiert er anscheinend nicht - hat jemand eine Ahnung, woran es liegen könnte?

    Code
    Sub KillDupes()
        ' Lösche doppelte Tabelleneinträge
        prev$ = ""
        For i = 1 To 1500
            curr$ = ActiveDocument.Tables(1).Cell(i, 1).Range
            If curr$ = prev$ Then
                ActiveDocument.Tables(1).Rows(i).Range.Delete
            End If
            prev$ = curr$
        Next
    End Sub
    Alles anzeigen

    Eventuell an der Zahl 1500? Die Tabelle hat nämlich etwas weniger als 1500 Zeilen (weil ich bereits ein paar Duplikate manuell gelöscht habe), und nach jeder Löschung würde die Zeilenanzahl natürlich weiter abnehmen.

  • Adok
    Punkte
    4.199
    Beiträge
    714
    • 13. Juni 2006 um 23:10
    • #6
    Zitat von stormcrow

    was auch oft hilft bei makros is makros aufzuzeichnen. einfach haendisch machen was man machen will und sich dann den generierten code anschauen. schon weisst wie die sachen heissen und wiesd was machen kannst.

    Das werde ich ausprobieren. Danke für den Tipp!

  • Adok
    Punkte
    4.199
    Beiträge
    714
    • 14. Juni 2006 um 00:15
    • #7

    Ach ja, mein Programm funktioniert (mit der kleinen Änderung "Range.Delete" -> "Delete" - keine Ahnung, ob das überhaupt notwendig war), nur war ich zu ungeduldig. Dennoch: Komisch, warum dieses Makro auf einem Pentium IV so lange braucht.

  • stormcrow
    Punkte
    360
    Beiträge
    72
    • 14. Juni 2006 um 17:53
    • #8

    naja, so makros sind leider nie schnell.

  • Maximilian Rupp 27. Dezember 2024 um 12:06

    Hat das Thema aus dem Forum Programmieren nach Entwicklung verschoben.

  1. Datenschutzerklärung
  2. Impressum