Live-Forum - Die aktuellen Beiträge

Datum

Titel

20.04.2024 07:57:54

Tablle fürs E-Auto - Preis wenn kürzer als 60 Min Ladezeit

20.04.2024 00:49:19

Excel Sheet in einen Excel Kalender einfügen

20.04.2024 00:08:11

In Ordner nur das Speichern von Dateien erlauben

19.04.2024 21:26:15

mehrfache Texte finden

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Anzeige

Archiv - Navigation

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

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

Makro bricht ab bei Range("Capital_Charge").Select

Forumthread: Makro bricht ab bei Range("Capital_Charge").Select
4 Beiträge zu diesem Forumthread
Anzeige
72 Threads zu ähnlichen Themen
Top 100 Forumthreads

Makro bricht ab bei Range("Capital_Charge").Select

05.12.2006 17:19:21

Bernd

Hallo liebe Community,
mein Makro soll in gleich aufgebauten Dateien, die in einem definierten Verzeichnis liegen, ein Feld namens "Capital_Charge" von 9 auf 8 % ändern. Das Feld E25 habe ich den Zieldateien selbstverständlich mit Capital_Charge benannt.
Der erste Teil, dass Ersetzen des Werte 9 durch 8, klappt. Leider geht damit die Formatierung in % verloren, die ich mit dem zweiten Teil des Makros wieder herstellen will. Leider bricht das nachfolgende Makro immer in der zweiten Zeile bei "Range("Capital_Charge").Select ab.
'Einen Wert in bestimmte Zellen schreiben
Mappe.Sheets("Financials").Range("Capital_Charge").Value = "8/100"
Range("Capital_Charge").Select
Selection.Style = "Percent"
Das Makro-Übewachungsfenster bringt die Meldung "Ausdruck in Kontext nicht definiert". Ich habe aber das Feld in der Zieldatei so benannt!!!!
Wer weiss denn Rat und will mir helfen?
Grüße
Bernd

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Lass doch mal den Tabellenblattnamen weg.

05.12.2006 17:30:02

NoNet
AW: Makro bricht ab bei Range("Capital_Charge").Select

05.12.2006 17:50:54

Luschi
Danke, Luschi

05.12.2006 18:32:07

Bernd
OT : http://de.wikipedia.org/wiki/Klein_Paris

06.12.2006 01:06:44

NoNet

Anzeige

Lass doch mal den Tabellenblattnamen weg.

05.12.2006 17:30:02

NoNet

Hallo Bernd,
über den Bereichsname ist doch bereits das Tabellnblatt mit definiert, alos könnte ma diese Angabe auch weglassen :
Mappe.Range("Capital_Charge").Value = "8/100"
Gruß, NoNet

AW: Makro bricht ab bei Range("Capital_Charge").Select

05.12.2006 17:50:54

Luschi

Hallo Bernd,
das eigentliche Problem ist, daß Du den Cursor auf eine zelle Setzen willst, wenn die dazugehörige Tabelle nicht aktiv ist. Auf "Select" kann man hier verzichten.
Öfters kann man in Fachbeiträgen lesen, daß man mit
Mappe.Range("Capital_Charge").Value = 8/100
eine Zelle direkt ansprechen kann. Das ist in den meisten Fällen auch richtig, aber wenn ich von einer Arbeitsmappe auf die benamte Zelle einer anderen Arbeitsmappe zugreifen will, dann mache ich das so:

   Dim rg As Range
Set rg = Mappe.Names("eee").RefersToRange
rg.Value = 8 / 100
rg.Style = "Percent"
Set rg = Nothing

Gruß von Luschi
aus klein-Paris

Anzeige

Danke, Luschi

05.12.2006 18:32:07

Bernd

Hi Luschi, danke Dir. Dein Tipp hat geklappt.
Leider habe ich noch ein Problem bei Summenbildung mit Fehlermeldung #Name? ergeben, obwohl kein Leerzeichen drinnen ist und Formatierung auf "Zahl" steht. Habe ich gerade neu gepostet.
Sag mal, wo ist Klein Paris?
Grüße
bernd

OT : http://de.wikipedia.org/wiki/Klein_Paris

06.12.2006 01:06:44

NoNet

Hallo Bernd,
siehe http://de.wikipedia.org/wiki/Klein_Paris
Liebe Grüße,
NoNet

72 Forumthreads zu ähnlichen Themen

Im Range("A1:C15") anderes Cursor-Symbol?

Hallo,
ist es möglich im Bereich Range("A1:C15") statt dem Kreuz ein Finger-, oder Pfeil Cursor-Symbol erscheinen zu lassen?
Gruß Reinhardt.

28.01.2009 09:25:00

Thread-ID: 1044456

Anzeige

VBA: rows.count benachbarte Zellen

Hallo,
mal wieder eine Frage... Ich habe sagen wir mal 2 Spalten "A" und "B"!
Spalte "A" ist ausgefüllt, in "B" ist gar nichts. Ich möchte nun die Spalte "B" soweit nach unten markieren, wie Spalte "A" ausgefüllt ist.
Das heisst wenn Spalte "A" bis Zeile 15 etwas stehen hat, dann so...

20.04.2009 12:47:57

Thread-ID: 1069779

For Each zelle In Range("a2:a1000") erweitern

Hallo,
Wenn ich diesen Befehl ausführe befinde ich mich gerade in Tabelle1. Ich möchte aber, dass u.s. Befehl in Tabelle2 ausgeführt wird. Kann mir jemand die Tabelle2 in den Befehl hineinkonstruieren.
Danke.
Gruß
Karsten
Dim zelle As Range
For Each zelle In Range("a2:a...

08.07.2009 10:59:35

Thread-ID: 1087125

Anzeige

Cells(Rows.Count, "A").End(xlUp).Row für Spalten

Hallo,
es gibt folgenden Code:
Cells(Rows.Count, "A").End(xlUp).Row
Den man z.B. in einer For-Schleife verwenden kann, dass die Forschleife bis zum Ende des Dokuments läuft (Zeilen).
Wie muss ich den Code umschreiben, dass er nicht die Zeilen von unten nach oben zählt, sondern d...

11.09.2009 13:12:45

Thread-ID: 1102004

Befehl Range("A1") bei mehreren Zellen?

Hallo,
ich hab im Excel Ein Makro geschrieben, mit dessen hilfe per Knopfdruck eine Mail an einen bestimmten Empfänger gesendet wird. Im Betreff und Text sind bestimmte Zelleninhalte mit dem Befehl Range("A1")
Wie kann ich das machen, wenn ich mehrere Zelleninhalte hab (A1, A2, A3, A4....

05.10.2009 12:54:12

Thread-ID: 1107243

von Range("F:F") zu Range("aktive Spalte")

Hallo,
kann mir jemand aus fogenden code:
Range("F:F").Select
ActiveWindow.Zoom = True
Range("aktive Spalte").Select
ActiveWindow.Zoom = True
machen?
Gruß
Karsten

09.11.2009 21:17:58

Thread-ID: 1115647

Cells(Rows.Count, NewFilSpa + 7).End(xlUp) = 100

Hallo
Cells(Rows.Count, NewFilSpa + 7).End(xlUp) = 100
Wie ereiche ich, dass der Wert 100 nicht in der letzten beschriebenen Zelle (wie Code oben)
sondern eine Zeile darunter eingefügt wird?
Besten Dank für eure Hilfe und Gruss
Hugo

13.12.2009 22:40:21

Thread-ID: 1123643

Range("A1:C1").copy Range("F6") schneller

Hallo,
gibt es eigentlich eine schicke Möglichkeit
Range("A1:C1").copy Range("F6")
ohne die Formate zu kopieren und genau so schnell und schlank?
Gruß und Dank,
Born

17.12.2009 15:39:37

Thread-ID: 1124697

Alle verwandten Forumthreads anzeigen

Befehl Range("A1") bei mehreren Zellen?

von Range("F:F") zu Range("aktive Spalte&quot

Cells(Rows.Count, NewFilSpa + 7).End(xlUp) = 100

Range("A1:C1").copy Range("F6") schnelle

Range("cTexta").Address mit Sheet Name

Range("A1:B" & Zei,"D1:D" & Zei)

Eindimensionales Array mit Range("A1:B40000") bild

Range("A1").Value aus anderem Blatt ?

Range("t20").Select: ActiveCell.Formula = "='

ActiveCell.Copy Sheets("tabelle1").Range("A2

Range("a25").End(xlUp).Select

With Sheets("Auswertung").Range(Cells(Z1, 1), Cell

Gegenteil "Cells(Rows.Count, 1).End(xlUp).Row" ?

Range(Cells) "Anwendungs-oder objektdef. Fehler"

Range(Cells) "Anwendungs-oder objektdef. Fehler"

.Cells(Rows.Count, "B").End(xlUp).Row

Range("A1:C1") = ColorIndex = 38

Range("A:B").Select ActiveWindow.Zoom = True

Range(spalte & zeile ) ?

Range("A1") = Date ... Bibilothek notwendig?

Unterschied Range("xxx").Value zu Range("xxx&

If Range("A1") = Format("hh:mm") Then

VBA Pivot Lastrow für Tabledestination

If Range("BI29").FormulaR1C1 > 0 Then

Überlauf bei Cells(Rows.Count, 3).End(xlUp).Row

Range("$A:$B,$D:$E").Select - selektiert auch $C

.Cells(Rows.Count, 1).End(xlUp).Row

Range("a2)".select funktioniert nicht

VBA Excel Formel für Summe ab 1.LZ+1 bis LZ-1

"Range("A1").Size" = DIN A4

Range("A6:F6").Select in Abhängikeit von i

Range("a1").value durch Platzhalter ersetzen?

Range("A1:A3") - A1, A3 variabel

Formel für +10.000 Zeilen mit VBA kopieren

IngRow / IngLast Anwendung VBA

Range("A1:K1").Select Numerisch ??

ComboBox3.AddItem Range("Zahl").Address

Worksheets("Tab1").Range("A1") - Proble

Range("A1").Value = 100 oder Range("A1&quo

Doppelklick => Range("A1") = 1

Label = Sheets("Tabelle1").Range("A1")

Label1 = Format(Sheets("Extras").Range("O32&q

Per VBA wenn c1="d" Leerzeile + Überschrift e

TextBox2.Text = Range("a3").Cells

ActiveCell.Offset(-1, 0).Range("A1").Select

Range("A1:A variable") wie ?

z = Range("A2:AP1000").Find(what:=....Falsch

Range("A2").Select funktioniert nicht

VBA rows.count

Range("A6,C6:H6") in Cell "schreibweise"

Range("B3", "C", "A7:A100").Co

Range("A3:A7").Autofit ?

Alle Bilder in Range("A1:A10") löschen....

VBA Range("A3:C3,A6:C8").Select

Range("variable1 & variable2")

Range("A1:P16") mit variablen

Sheets.Name = Sheets.Range("A1")

Wiederholtes Range("a" & x).Select

Problem Cells(Rows.Count)

Excel.Range("A" & Start_Postion).Value = &quot

STRG + POS1 per VBA ?

Range("BenannterBereich").Parent.Name in Klassenm.

If ActiveCell = Range("A1") Then

Range("Name") in anderem Workbook o. She

Range(Spalte) -> mehrdimensionales Array

Range("A3:<ende verwendete Spalten>:3).s

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn in einer zelle ein bestimmtes wort steht dann

34081
excel zelle färben wenn wert in anderer zelle

23512
excel teil bis zeichen

16681

Weitere Forumthreads anzeigen

excel zeichen vor zahl einfügen

16052

excel scrollt nicht mehr

15741

excel formel kopieren ohne bezug zu ändern

15343

excel zelle enthält zeichen

14267

excel wenn dann text aus zelle übernehmen

12306

excel text abschneiden ab zeichen

11938

excel erste zeichen abschneiden

11417

excel summe zeigt immer null

10634

excel zelle farbig wenn andere zelle wert

10521

zählen wenn oder

9511

excel zeichen von links abschneiden

9498

excel prüfen ob zelle bestimmten text enthält

9480

excel zelle leer wenn 0

9079

vba variable in zelle schreiben

8864

excel text bis zum ersten leerzeichen

8800

zählen wenn datum

8428

excel keine doppelten werte zählen

8178

excel wert in andere zelle übertragen

8062

excel text aus zelle auslesen ab zeichen

7989

excel rechts ab zeichen

7915

excel formel größer als und kleiner als

7806

excel vba letzte zeile ermitteln

7675

excel datum und zeit zusammenführen

7521

excel spalten ausblenden mit button

7291

excel minuten in stunden

7167

excel wenn dann zeile ausblenden

7070

mauszeiger kreuz statt pfeil

7068

excel kw in monat

6935

excel bedingte formatierung datum älter als

6521

summewenn nicht

6515

excel mehrere spalten untereinander anordnen

6294

excel makro zelleninhalt löschen

6182

excel wenn ergebnis negativ dann 0

6026

wenn funktion mit uhrzeit

6006

excel letzte zeichen aus zelle auslesen

5981

excel wert in spalte vorhanden

5920

erstes wort aus zelle excel

5910

shortcut excel tabellenblatt wechseln

5872

excel zahlen runterziehen funktioniert nicht

5838

excel wenn mehrere zellen nicht leer, dann

5829

excel gesperrt durch mich selbst

5734

excel letztes zeichen entfernen

5705

@ zeichen in excel formel

5689

excel sverweis summe

5676

excel wenn leer dann andere zelle

5582

excel wort in text suchen

5539

excel uhrzeit in 15 min schritten

5492

vba suchen

5379

zählenwenn ungleich leer

5341

excel summewenns mehrere spalten

5321

excel nullen vor zahl entfernen

5224

excel zelle farbig wenn andere zelle wert

5182

excel vba ja nein abfrage

5105

excel formel email adresse aus vorname nachname

5082

wenn sverweis nv dann 0

5082

vba farbe zelle ändern

5053

wenn zelle farbig dann x

5053

excel alle buchstaben entfernen

4974

excel wenn dann wert aus zelle übernehmen

4903

summewenns ungleich text

4847

excel anführungszeichen in formel als text

4841

vba zeichen in string suchen

4789

datum plus 6 monate excel

4769

excel summewenn datum zwischen

4754

vba passwort

4727

excel zeichen von rechts suchen

4710

excel vba if mit mehreren bedingungen

4679

excel diagramm vordergrund hintergrund

4659

excel format ändert sich erst nach doppelklick

4654

excel bild automatisch an zelle anpassen

4588

excel punkte aus zahlen entfernen

4564

excel erste 4 zeichen einer zelle löschen

4556

excel text übernehmen

4516

vba als text gespeicherte zahl in zahl umwandeln

4508

vba excel zeilenumbruch

4482

zählenwenn enthält text

4469

excel wert suchen und spalte ausgeben

4452

vba prüfen ob blatt vorhanden

4430

excel vba makro abbrechen

4411

excel wenn zelle nicht leer dann datum heute

4362

excel kopieren ohne verknüpfung

4360

excel runden summe

4357

excel nur uhrzeit ohne datum

4332

userform schließen vba

4327

durchschnitt prozent berechnen

4327

kalenderwoche in datum umrechnen

4324

excel zeilennummer von wert finden

4308

datum verketten excel

4300

excel vba zelle aus anderem tabellenblatt auslesen

4285

gruppierung excel benennen

4260

excel gruppieren nicht möglich

4229

zu viele argumente excel

4199

zeilenumbruch vba code

4182

excel dropdown ohne leere zellen

4158

excel filter trotz blattschutz

4142

excel drucklinien nicht anzeigen

4075

excel formel aktuelles jahr

4025

Anzeige

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

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn in einer zelle ein bestimmtes wort steht dann

34081
excel zelle färben wenn wert in anderer zelle

23512
excel teil bis zeichen

16681

Weitere Forumthreads anzeigen

excel zeichen vor zahl einfügen

16052

excel scrollt nicht mehr

15741

excel formel kopieren ohne bezug zu ändern

15343

excel zelle enthält zeichen

14267

excel wenn dann text aus zelle übernehmen

12306

excel text abschneiden ab zeichen

11938

excel erste zeichen abschneiden

11417

excel summe zeigt immer null

10634

excel zelle farbig wenn andere zelle wert

10521

zählen wenn oder

9511

excel zeichen von links abschneiden

9498

excel prüfen ob zelle bestimmten text enthält

9480

excel zelle leer wenn 0

9079

vba variable in zelle schreiben

8864

excel text bis zum ersten leerzeichen

8800

zählen wenn datum

8428

excel keine doppelten werte zählen

8178

excel wert in andere zelle übertragen

8062

excel text aus zelle auslesen ab zeichen

7989

excel rechts ab zeichen

7915

excel formel größer als und kleiner als

7806

excel vba letzte zeile ermitteln

7675

excel datum und zeit zusammenführen

7521

excel spalten ausblenden mit button

7291

excel minuten in stunden

7167

excel wenn dann zeile ausblenden

7070

mauszeiger kreuz statt pfeil

7068

excel kw in monat

6935

excel bedingte formatierung datum älter als

6521

summewenn nicht

6515

excel mehrere spalten untereinander anordnen

6294

excel makro zelleninhalt löschen

6182

excel wenn ergebnis negativ dann 0

6026

wenn funktion mit uhrzeit

6006

excel letzte zeichen aus zelle auslesen

5981

excel wert in spalte vorhanden

5920

erstes wort aus zelle excel

5910

shortcut excel tabellenblatt wechseln

5872

excel zahlen runterziehen funktioniert nicht

5838

excel wenn mehrere zellen nicht leer, dann

5829

excel gesperrt durch mich selbst

5734

excel letztes zeichen entfernen

5705

@ zeichen in excel formel

5689

excel sverweis summe

5676

excel wenn leer dann andere zelle

5582

excel wort in text suchen

5539

excel uhrzeit in 15 min schritten

5492

vba suchen

5379

zählenwenn ungleich leer

5341

excel summewenns mehrere spalten

5321

excel nullen vor zahl entfernen

5224

excel zelle farbig wenn andere zelle wert

5182

excel vba ja nein abfrage

5105

excel formel email adresse aus vorname nachname

5082

wenn sverweis nv dann 0

5082

vba farbe zelle ändern

5053

wenn zelle farbig dann x

5053

excel alle buchstaben entfernen

4974

excel wenn dann wert aus zelle übernehmen

4903

summewenns ungleich text

4847

excel anführungszeichen in formel als text

4841

vba zeichen in string suchen

4789

datum plus 6 monate excel

4769

excel summewenn datum zwischen

4754

vba passwort

4727

excel zeichen von rechts suchen

4710

excel vba if mit mehreren bedingungen

4679

excel diagramm vordergrund hintergrund

4659

excel format ändert sich erst nach doppelklick

4654

excel bild automatisch an zelle anpassen

4588

excel punkte aus zahlen entfernen

4564

excel erste 4 zeichen einer zelle löschen

4556

excel text übernehmen

4516

vba als text gespeicherte zahl in zahl umwandeln

4508

vba excel zeilenumbruch

4482

zählenwenn enthält text

4469

excel wert suchen und spalte ausgeben

4452

vba prüfen ob blatt vorhanden

4430

excel vba makro abbrechen

4411

excel wenn zelle nicht leer dann datum heute

4362

excel kopieren ohne verknüpfung

4360

excel runden summe

4357

excel nur uhrzeit ohne datum

4332

userform schließen vba

4327

durchschnitt prozent berechnen

4327

kalenderwoche in datum umrechnen

4324

excel zeilennummer von wert finden

4308

datum verketten excel

4300

excel vba zelle aus anderem tabellenblatt auslesen

4285

gruppierung excel benennen

4260

excel gruppieren nicht möglich

4229

zu viele argumente excel

4199

zeilenumbruch vba code

4182

excel dropdown ohne leere zellen

4158

excel filter trotz blattschutz

4142

excel drucklinien nicht anzeigen

4075

excel formel aktuelles jahr

4025

Anzeige

Anzeige

Anzeige

Archiv - Verwandte Themen

Forumthread

Beiträge

im range("a1:c15") anderes cursor-symbol?

1

destination:=.range("a" & zeile)

3

vba: rows.count benachbarte zellen

9

for each zelle in range("a2:a1000") erweitern

2

range("a1")= strtext

1

cells(rows.count, "a").end(xlup).row für spalten

2

befehl range("a1") bei mehreren zellen?

4

von range("f:f") zu range("aktive spalte&quot

6

cells(rows.count, newfilspa + 7).end(xlup) = 100

2

range("a1:c1").copy range("f6") schnelle

2

range("ctexta").address mit sheet name

2

range("a1:b" & zei,"d1:d" & zei)

2

eindimensionales array mit range("a1:b40000") bild

4

range("a1").value aus anderem blatt ?

6

range("t20").select: activecell.formula = "='

1

activecell.copy sheets("tabelle1").range("a2

5

range("a25").end(xlup).select

14

with sheets("auswertung").range(cells(z1, 1), cell

6

gegenteil "cells(rows.count, 1).end(xlup).row" ?

1

range(cells) "anwendungs-oder objektdef. fehler"

2

range(cells) "anwendungs-oder objektdef. fehler"

2

.cells(rows.count, "b").end(xlup).row

8

range("a1:c1") = colorindex = 38

2

range("a:b").select activewindow.zoom = true

6

range(spalte & zeile ) ?

7