Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
932to936
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
932to936
932to936
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

filter

filter
04.12.2007 18:28:49
klaro
Hallo Leute
Wer kann sagen wiso
Ich bekomme : Fehler13

Sub filter()
If (("A1") + ("A2")) / ("A1")  1.7 = True Then
Range("A3").Value = Range("A1").Value
End If
End Sub


Also
Ich möchte wenn Bedingung Wahr ist
(A1+A2)/A11,7 ist
Der Wert aus A1 nach A3 übergeben wird.
Sobald aberWert (A1+A2)/A1 eine Andere
Große annimt so soll nichts passieren.
Mit freundlichen Grüßen
klaro

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

Betreff
Datum
Anwender
Anzeige
AW: filter
04.12.2007 18:51:00
ransi
HAllo Klaro
Irgendwie ist deine Synthax quer.
Versuche es mal so:
' **********************************************************************
' Modul: Tabelle1 Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit



Sub filter()
Dim wert
wert = (Range("a1") + Range("A2")) / Range("a1")
If wert > 1.7 Then _
    If wert < 2.3 Then _
    Range("A3").Value = Range("A1").Value
End Sub

ransi

Anzeige
AW: filter
04.12.2007 18:56:00
Jan3
Hi,
Variante 1.

Sub filter()
If (Range("A1") + Range("A2")) / Range("A1")  1.7 = True Then
Range("A3").Value = Range("A1").Value
End If
End Sub


Varinate 2


Sub filter1()
If [A1] + [A2] / [A1]  1.7 = True Then
Range("A3").Value = Range("A1").Value
End If
End Sub


Jan

AW: filter
04.12.2007 22:12:33
klaro
Hi,ransi und Jan3
ich habe alles ausprobiert
es kommt komischer weise
nur Datum:
A1=2 kommt 02.02.1900
wird auch nach A3 übergeben!
o-waia
mfg
klaro

Anzeige
AW: filter
05.12.2007 14:56:00
Jan
Hi,
Zellen Standard oder als Zahl formatieren.
mfg Jan

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige