Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1924to1928
1924to1928
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Kommentare im Druckbereich zählen

Forumthread: VBA Kommentare im Druckbereich zählen

VBA Kommentare im Druckbereich zählen
06.04.2023 13:33:05
Joschi Witchcraft

Hallo Forum,

mit "ActiveSheet.Comments.Count" kann ich prüfen, ob auf dem Tabellenblatt Kommentare vorhanden sind.

WIe kann ich prüfen, ob innerhalb des Druckbereichs Kommentare vorhanden sind?

Meine Versuche:

Debug.Print Range(ActiveSheet.PageSetup.PrintArea).Comments.Count
Debug.Print ActiveSheet.PageSetup.PrintArea.Comments.Count

Gruß Joschi

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Kommentare im Druckbereich zählen
06.04.2023 14:06:34
GerdL
Moin Joschi!

Sub Unit()

    Dim X As Range, Y As Range, a As Long
    
    With ActiveSheet
        If .PageSetup.PrintArea > "" Then
            Set X = .Cells.SpecialCells(xlCellTypeComments)
            Set Y = .Range(.PageSetup.PrintArea)
            If Not X Is Nothing And Not Y Is Nothing Then
            If Not Intersect(X, Y) Is Nothing Then
                a = Intersect(X, Y).Count
            End If
            End If
        End If
    End With

    MsgBox a

End Sub
Vielleicht gehts einfacher.
Gruß Gerd

Anzeige
;

Forumthreads zu verwandten Themen

Kommentar im Code farbig drucken
siegfried

Hallo zusammen,
ich habe zwei Fragen.
1. Wenn ich in einem Code mit vorangestelltem Hochkomma einen Kommentar schreibe, ist dieser hellgrün unterlegt. Wenn ich den Code ausdrucke, wird dieser aber in schwarz gedruckt.
Wie kann ich erreichen, dass auch der Kommentar hellgrün ausgedr...
09.05.2012 01:03:22
Thread-ID: 1262843
5 Beiträge
VBA: Fehler im Code?
WalterK

Hallo
folgender Code bringt mir den Fehler: Laufzeitfehler 1004:
Anwendungs- oder objektdefinierter Fehler!
Der Code steht in der Tabelle Makrostart gestartet werden und betrifft die Tabelle MeineTabelle!
Ziel: Es sollen in MeinTabelle die Zellen in Spalte A Gelb hinterlegt werd...
24.07.2013 20:55:25
Thread-ID: 1324019
3 Beiträge
einzelne Kommentare im VBA-Code optisch hervorheb.
Susann

Hallo Leute,
da mein VBA-Code sehr lang ist, möchte ich bestimmte Kommentare optisch hervorheben, quasi wie kleine Zwischenüberschriften gestalten.
Am liebsten hätte ich das über eine Farbänderung von standard-grün auf rot (bei ausgewählten Kommentaren) gemacht, aber wie euch bekannt is...
04.04.2014 09:38:57
Thread-ID: 1356098
2 Beiträge
Zellen per VBA farbig markieren - Hilfe beim code
toteitote
Hi, ich habe die Grundlage von dem code von 'stackoverflow' kopiert und möchte ihn nun praktisch utilisieren. Leider komme ich nicht weiter und hoffe mir kann geholfen werden...
http://www.pic-upload.de/view-24541374/Excel-VBA-Anwendung.jpg.html
http://www.pic-upload.de/view-24541459/VBA-C...
08.09.2014 20:28:08
Thread-ID: 1380518
8 Beiträge
Anzeige
zu viele Zeichen in VBA-Zeilenumbruch im Makrocode
braun

Sheets(1).Select
startzeile = 2
Spalte = 2
startzeile2 = 2
Sheets(1).Select
Letzte_Zeile = Range(Cells(60000, Spalte), Cells(60000, Spalte)).End(xlUp).Row
For i = startzeile To Letzte_Zeile
If Left(Sheets(1).Cells(i, Spalte), 7) = "ABCDEFG" Or Left(Sheets(1).Cells(i,...
26.08.2015 13:43:05
Thread-ID: 1444522
20 Beiträge
Bild im Kommentar per VBA Problem
Jürgen

Hallo Leute
Ich hab seit 3 Jahren einen Coder mit dem ich Automatisch ein Bild in ein Kommentarfeld einfüge und an einen fixen Ort abspeichern lasse.
Seit ich Office 365 habe geht das aber nicht mehr er macht mir ein Kommentar Speichert das auch aber das Bild wird nicht eingefügt sonder...
11.01.2017 14:12:24
Thread-ID: 1534425
6 Beiträge
Code im Tabellenmodul erzeugen über VBA
Ron Andres

Hi,möchte im Klassenmoduls eines Tabellenblattes über eine Prozedur Code erzeugen! funktioniert aber nicht richtig.
Ich starte diese Prozedur aus einer anderen!Hier der Code:Public Sub Code_erzeugen()
'On Error Resume Next
Dim wks As Worksheet, wkb As Workbook
Application.Di...
11.11.2002 16:54:42
Thread-ID: 179883
2 Beiträge
Anzeige
Schriftfarbe über VBA-fehler im Code
Andi_H

hi zusammen,
ich habe ein Problem mit folgendem Code:Sub faerben1()
Dim i As Integer, x As Integer
Dim zz As Variant
zz = Sheets("zz").Cells(3, 1).Value
Sheets(1).Select
'spalten
For i = 4 To 13 Step 3
' zeilen
For x = 12 To 41
If IsNumeric(Cells(x, i)) Then
Wit...
23.05.2003 10:46:54
Thread-ID: 260671
7 Beiträge
Kommentare im Source-Code automatisch entfernen
Richard M.

Hallo,
hat jemand schon mal irgendwo ein Tool gesehen, welches aus dem VBA-Quellcode alle Kommentare automatisch entfernt?

Danke für jegliche Hinweise

Richard
09.07.2003 12:46:41
Thread-ID: 278836
2 Beiträge
Löschen von Leerzeilen u. Kommentaren im Code
Leerzeilen

Hallo zusammen,
nachdem ich mir jetzt den Wolf gesucht hab und nix gefunden hab´, möchte ich jetzt euch mal fragen:
Ich hab mal ein Tool gefunden (und leider wieder gelöscht!!!) das den VBA Code bereinigt. D.h. Leerzeilen, Kommentare usw. rausschmeißt. Auf Freeware.de hab ich auch was N...
12.01.2005 23:29:42
Thread-ID: 546303
6 Beiträge
VBA meldet Fehler im code
achim

Hallo Excel Freunde
Ich habe diesen code mit hilfe des forums.
dieser code ist soweit o.k. bis auf die meldung
Obektvariable oder with blockvaribiale nicht festgelegt
wer kann mal schauen was das sein könnte!!!
Private Sub UserForm_Initialize()
Dim strPfad As String
...
22.06.2006 07:40:39
Thread-ID: 775412
7 Beiträge
VBA: Komprimierung eines Codes
Charly

Hallo Oberschlumpf,
wie im Vorigen Beitrag erwähnt, bitte Ich darum zum Komprimieren des Codes.
„Beitrag: VBA: ComboBox mit zwei Spalten“
Anbei Bsp-Datein:
https://www.herber.de/bbs/user/135665.zip
Gruß Charly
06.03.2020 13:15:43
Thread-ID: 1744583
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige