Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 18:41:19
vba Zeilen duplizieren ab aktiver Zeile bis letzte Zeile
25.04.2024 18:22:55
Zeilen mit bestimmtem Datum in andere Mappe übertragen
25.04.2024 18:14:45
VBA - Excell - Kopie und "Diebstahl" Schützen
25.04.2024 17:49:39
Bedingte Formatierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
696to700
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
696to700
696to700
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Zelle füllen

VBA Zelle füllen
21.11.2005 10:08:24
maennle
Hallo,
würde gerne via VBA eine bestimmte Zeile mit einem "-" füllen, bei einer Bedingung.
Hat jemend den Code?
Danke und grüße an alle

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Zelle füllen
21.11.2005 10:36:45
Klaus
Hallo,
zum füllen der Zelle benutzt du range("A1")="-"
Eine Bedingung fragst du ab mit if TRUE then
Zum Beispiel könntest du schreiben
IF Range("A2")="hallo" THEN Range("A1")="-"
Gruß,
Klaus M.vdT
AW: VBA Zelle füllen
21.11.2005 11:56:42
maennle
Hallo Klaus,
das klappt schon, hätte da aber noch mal was:
ich würde gerne das Zeichen "-" bei bedingung in die letzte gefüllte Zelle des Blattes einfügen.
Geht das?
AW: VBA Zelle füllen
21.11.2005 12:10:17
Klaus
Hallo,


Sub letztefuellen()
Dim irow As Integer
irow = Cells(Rows.Count, 1).End(xlUp).Row
IF [BEDINGUNG] THEN Range("A" & irow) = "-"
End Sub


Wobei (Rows.Count, 1) die letzte gefüllte Zelle in Spalte A ermittelt, (Rows.Count, 2) die von Spalte B und so weiter.
Das Range("A" & irow) musst du natürlich auch an die gewünschte Spalte anpassen.
Achtung: so wie es jetzt ist, überschreibt es den Inhalt der letzten gefüllten Zelle! Deine Fragestellung impliziert, dass du genau das möchtest, aber wenn es doch lieber die erste freie Zelle nach der letzten gefüllten sein soll (da wird ja nicht ohne Grund was drinnen stehen), nimm einfach irow = 1 + Cells(Rows.Count, 1).End(xlUp).Row
 .
Gruß,
Klaus M.vdT
Anzeige
AW: VBA Zelle füllen
21.11.2005 13:44:37
maennle
Hallo Klaus,
irgendwie klappt das bei mir nicht so recht.
ich möchte eigentlich diese beiden codes verbinden, sodas bei der Bedingung ein Textfeld ans Ende meiner Tabelle gestellt wird, sozusagen als Anhang/Erläuterung derjenigen. Das Zeichen deshalb, weil verschiedene Bedingungen eintreten können und ggf. mehrere Textfelder , sozusagen endlos und in verschiedener Zusammenstellung auftreten.
Mein Plan: Beding. 1 tritt ein, das Textfeld (welches immer 25 Zeilen lang ist) wird sichtbar am ende der Tabelle;gleichzeitig wird ein "-" gesetzt um das nächste Textfeld "positionieren zu können".
Hast Du verstanden, was mein vielleicht etwas umständlicher Plan sein soll?
Hier der Code:
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim letzte As Range
Shapes("Textfeld 44").Visible = False
If [o301] > 0 Then
Set letzte = Range("c65536").End(xlUp)
With Shapes("Textfeld 44")
.Visible = True
.Top = letzte.Top
.Left = letzte.Left + letzte.Width
End With
End If
End Sub

Sub letztefuellen()
Dim irow As Integer
irow = 1 + Cells(Rows.Count, 3).End(xlUp).Row
If [0301] > 0 Then Range("c" & irow) = "-"
End Sub
Hab hald kaum Ahnung von VBA..............
Danke für Deine Mühen...
Tobi
Anzeige
AW: VBA Zelle füllen
23.11.2005 09:46:16
Klaus
Hi Tobi,
das [Bedingung] ist natürlich ein Platzhalter. Ich nehme mal an, deine Bedingung ist
o310 &gt 0
Dann muss es im Code heissen:
If Range("o301") &gt 0 Then ...
Gruß,
Klaus M.vdT.

18 Forumthreads zu ähnlichen Themen

Per VBA bestimmte Zellen mit Formel Füllen
Benjamin

Hallo
ich habe das Probelm, dass ich bestimmte Zellen in mehreren Dokumenten habe, in denen die Formel geändert werden muss.
nun wollte ich wissen, ob dies Mittels VBA geht wenn die reihen folge wie folg t ist
A9 sowie W9
A130 W130
....
07.12.2011 17:37:37
Thread-ID: 1240992
3 Beiträge
Anzeige
Fehler im Befüllen von Zellen mit VBA
Zellen

Hallo Forum,
ich möchte eine Tabelleneingabe wahlweise auf deutsch oder englisch ermöglichen.
Die Sprachumstellung möchte ich nun mit folgendem Code darstellen:
Beispiel:
Range("A1").Select
'=WENN(Sprachauswahl!$C$10=1;"Bitte wählen Sie die Währung aus:";"Please choose your...
13.08.2012 09:33:58
Thread-ID: 1274809
7 Beiträge
VBA Zelle mit Komma-Zahl füllen
Max

Hallo meine Lieben,
ich habe folgendes Problem.
Ich habe einen Makro geschrieben, der eine Zelle mit einer von mir im VBA vorgegeben Zahl füllt. Für natürliche Zahlen (z.B. 0, 1, etc.) funktioniert es wunderbar, die Zahlen mit Kommastelle (z.B. 1,1) werden aber als in eine Text umgewand...
01.08.2014 11:22:03
Thread-ID: 1373568
5 Beiträge
Anzeige
VBA Zellen automatisch füllen - Code verfeinern
Annett

Hallo liebe VBA Experten ;-)
kann hier mal einer helfen ?!
Im unten stehen Code (Auszug) stehen vordefinierte Wörter.
Ist es möglich das diese aus einer Tabelle ausgelesen werden können?
Im Code steht -> Case "Ausgeliefert"
und an dieser Stelle wollte ich gerne...
08.12.2015 21:41:36
Thread-ID: 1463193
13 Beiträge
VBA - Zellen automatisch befüllen
Mike

Hallo liebes Forum!
Stehe vor einem kleinen Problem und würde eure Unterstützung benötigen:
Ich habe viele Exceldateien, wo in der Spalte A die Häufigkeit eines Merkmales eingetragen ist. In Spalte B ist das Merkmal selbst eigetragen. Ich suche nun nach einem Makro, welches mir im erste...
06.01.2016 15:46:21
Thread-ID: 1467425
3 Beiträge
VBA: mit UDF Zellen füllen
K.

Hallo,
ich habe lange im Netz gesucht und komme leider nicht auf einen grünen Zweig:
Ich habe eine UDF, die ich im Tabellenblatt company name in der Zelle B3 mit dem Befehl =DVLOOKUP('import data'!$A2; BEREICH.VERSCHIEBEN('import data'!$A$2; ; ; ANZAHL2('import data'!$A$2:$A$99999); );...
29.04.2016 16:10:03
Thread-ID: 1491214
5 Beiträge
VBA: Leere Zellen in Tabelle füllen-mit Bedingung
Fabian

Liebes Forum,
ich stehe vor folgender Herausforderung:Ich möchte in einer Tabelle leerze Zellen unter Abhängigkeit zur Splate A mit Text füllen.
Ich habe eine Liste mit ID in Spalte A, Firmennamen in Spalte B, Firmenanschrift in Spalte C und die Tochterunternehmen in Spalte D sowie weit...
27.07.2017 09:56:16
Thread-ID: 1571022
2 Beiträge
VBA Zelle mit Formel füllen variabel
Lars

Hallo zusammen,
ich habe eine kleine Herausforderung mit VBA bzw. stehe mal wieder auf dem Schlauch.
Ich habe eine Formel in einem Übersichtsblatt ("Overview") mit Bezug auf andere Tabellenblätter, z.B. Overview!I10 = QA - 5687!D41
Mit einem Makro blende ich das Tabellenblatt "QA –...
23.07.2018 15:40:48
Thread-ID: 1635399
5 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
2
6
4
4
12
2
4
1
4
2
4
3
8
1
4
3
3