Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 09:26:26
Median für Zeilen mit gleichen Zeitstempel
19.04.2024 08:41:23
Zwei Makros in ein Arbeitsblatt - zweite wird nicht ausführt
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1332to1336
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
1332to1336
1332to1336
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

In Spalte vor Werte Minuszeichen setzen

In Spalte vor Werte Minuszeichen setzen
23.10.2013 11:23:44
Jockel
Hallo,
Ich möchte folgendes per VBA machen.
Habe ein Sheet ("TEMP"). In der Spalte E soll ab Zeile 2 die Spalte durchlaufen werden und vor jeden Wert, der grösser als NULL ("0") ist, vor den bestehenden Wert ein MINUSZEICHEN gesetzt werden.
Beispiel:
VORHER:
E
------
WERTE
------
0
2
0
5
12
NACHER :
E
------
WERTE
------
0
-2
0
-5
-12
Wie krieg ich das mit einem Makro hin ?
Danke
Jockel

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: In Spalte vor Werte Minuszeichen setzen
23.10.2013 11:31:42
Rudi
Hallo,
wenn es keine negativen Zahlen gibt: 
Sub Minus()
With Sheets("temp")
With .Cells(1, Columns.Count)
.Value = -1
.Copy
End With
.Range(.Cells(2, 5), .Cells(Rows.Count, 5).End(xlUp)).PasteSpecial _
Paste:=xlPasteValues, operation:=xlMultiply
.Cells(1, Columns.Count).Clear
End With
End Sub

Gruß
Rudi

In Spalte vor Werte Minuszeichen setzen
23.10.2013 11:33:14
Matthias
Hallo
Dim x As Long
Dim Ende&
Ende = 6 'anpassen oder einlesen
For x = 2 To Ende
If Cells(x, 5) > 0 Then Cells(x, 5) = Cells(x, 5) * -1
Next
Gruß Matthias

Anzeige
AW: In Spalte vor Werte Minuszeichen setzen
23.10.2013 11:33:53
Bastian
Hallo Jockel,
z.B. so:
Option Explicit
Sub Minus()
Dim lngLZeile As Long
Dim intZaehler As Integer
lngLZeile = ActiveSheet.Cells(Rows.Count, 5).End(xlUp).Row
For intZaehler = 2 To lngLZeile
With Cells(intZaehler, 5)
If IsNumeric(.Value) And .Value > 0 Then
.Value = .Value * -1
End If
End With
Next intZaehler
End Sub
Gruß, Bastian

Dank Euch allen, habt mir sehr geholfen owT
23.10.2013 14:26:42
Jockel

305 Forumthreads zu ähnlichen Themen

Anzahl unterschiedl. Werte in Spalte zählen
Jakob

Hallo,
ein ähnliches Problem wurde hier im Forum schon einmal diskutiert. (https://www.herber.de/forum/archiv/632to636/t635773.htm)
Meine Problem:
Wie kann ich die Anzahl unterschiedlicher Einträge/Werte einer Spalte erhalten, ohne dass diese vorgegeben werden ( also ohne die Verwe...
14.08.2008 18:16:11
Thread-ID: 1001934
2 Beiträge
Anzeige
Anzahl gleicher Elemente einer Spalte
Pascal

Hallo,
wie kann ich die Anzahl der gleichen elemente in einer Spalte ermitteln?
die Tabelle sieht etwa so aus:
1
3
0
1
1
2
0
1
das ergebis soll dieses sein:
0: 2
1: 4
2: 1
3: 1
03.11.2008 08:35:37
Thread-ID: 1021264
5 Beiträge
zahlen in zeichenkette suchen und wert zurück gebe
gatewax

Hallo,
ich habe einen Spaltenbereich xy der verschiedene Werte aus Zahlen und Texten enthält. (Bsp Asdf0001, B/123_sdf, usw.)
nun habe ich in einer weiteren spalte z zahlen stehen welche in dem spaltenbereich xy (unabhängig ob alleinstehen oder in Textkombination) vorkommen.
ich suc...
27.11.2008 08:22:20
Thread-ID: 1028208
3 Beiträge
Anzeige
Anzahl der Zeichen in einer Zelle
Jan

Guten Morgen
Welcher Befehl zählt die Zeichen in einer Zelle?
Danke
Gruß Jan
07.01.2009 08:38:00
Thread-ID: 1037436
3 Beiträge
Nur bestimmte Zeichen in Zelle
wolle

Erstmal ein Hallo an Alle und alles gute in 2009!
Ich hätte folgende Frage:
Wie kann ich es machen, dass in Spalte B von Zelle B10 bis Zelle Bxx nur die Zeichen "J" "j" "N" "n" eingeben werden können und bei Eingabe eines anderen Zeichens ein kleines Popup erscheint, das den Bediener in...
09.01.2009 11:22:25
Thread-ID: 1038162
3 Beiträge
Zahlen in Extra spalte separieren
Dirk

Hallo zusammen,
ich habe eine Liste von Adressen bei der die Hausnummer immer hinter dem Strassenamen steht. Und zwar in der selben Spalte.
Z.B. Hauptstr. 12
Kirchweg 23
u.s.w
Ich brauche die Hausnummern aber in einer extra Spalte. Hat jemand eine Idee?
Nach dem Strassen...
12.01.2009 16:55:27
Thread-ID: 1038937
8 Beiträge
zählen bestimmter Zeichen in einer Zelle
Georg

Hallo Excel Welt,
wie kann ich die Anzahl bestimmter Zeichen (z.B. Kommas) in einer Zelle zählen?
Beispiel:
A2 = 12, 34, 2, 134
B2 = 3 (es sind drei Kommas in der Zelle A2) = dafür benötige ich die Lösung
Oder kann ich die Anzahl der (durch Kommas getrennten) Zahlen direkt...
21.01.2009 16:03:36
Thread-ID: 1042267
6 Beiträge
VBA: Bestimmte Zeichenfolge in Zelle finden
gega

Hallo ich bins nochmals,
ich finde einfach keine Möglichkeit zwei Teile aus dem String herauszulösen, da nur "Käufer: " und "[ Kontakt mit Käufer aufnehmen ]" fest am Anfang und Ende des Strings sind und der Käufername hier "leu_bw_cen" unterschiedlich lang ist und auch die EMail-Adr. zw. d...
23.01.2009 11:52:00
Thread-ID: 1042917
3 Beiträge
Anzeige

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
1
4
4
2
3
2
2
7
5
2
1
4
3
11
2
4
1
4
4
6
11
2
4
1
2