Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 13:44:37
Datum in Excelformel anzeigen
23.04.2024 13:31:41
alle Tabellblätter als csv exportieren - Verzeichnis wählen
23.04.2024 13:19:18
Daten aus externer Datei als Bereich übernehmen... ?
23.04.2024 12:57:21
Makro für aktuell geöffn. Datei mit gleichen Namen speichern
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
992to996
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
992to996
992to996
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kommentare einfügen

Kommentare einfügen
17.07.2008 10:55:10
Alex
Folgendes Problem:
In der Spalte 88 (Spalte CJ) in den Zeilen 10 bis 100 stehen Werte.
Dies Werte möchte ich in die Spalte 8 (Spalte H) als Kommentar einfügen.
Was kann ich machen?
Danke für Deine Hilfe.
Gruß
Alex

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kommentare einfügen
17.07.2008 11:13:00
Beverly
Hi Alex,

Sub kommentare_einfuegen()
Dim loZeile As Long
Dim coKommentar As Comment
Application.ScreenUpdating = False
For loZeile = 10 To 100
If Cells(loZeile, 88)  "" Then
If Cells(loZeile, 8).Comment Is Nothing Then
Cells(loZeile, 8).AddComment Cells(loZeile, 88).Text
Set coKommentar = Cells(loZeile, 8).Comment
coKommentar.Shape.OLEFormat.Object.AutoSize = True
End If
End If
Next loZeile
Application.ScreenUpdating = True
Set coKommentar = Nothing
End Sub



Anzeige
AW: Kommentare einfügen
17.07.2008 11:17:00
UweD
Hallo Alex
so z.B.

Sub Kommentar()
Dim i%
Range(Cells(10, 8), Cells(100, 8)).ClearComments
For i = 10 To 100
Cells(i, 8).AddComment Cells(i, 88).Text
Next i
End Sub


Gruß UweD

AW: Kommentare einfügen
17.07.2008 12:05:59
Alex
Danke Beverly und Uwe,
hat sehr gut geklappt.
Gruß
Alex

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige