Zahl aus Excel in VBA übernehmen

Question

Hallo liebe Excelfreunde,

wie kann ich folgendes Problem lösen??

Range(ZelleE2:15000)

Wie bekomme ich es hin, das VBA einfach den Wert von Zelle E2 nimm??

Viele Grüße
Sa

Answer 1

Natürlich meine ich:

Range("ZelleE2:15000")

Ausrufezeichen vergessen ;-)

Answer 2

Hallo Saharra,

entweder

Range("E2").Value

oder

Cells(2,5).Value


Gruss
Rainer

Answer 3

Hi Rainer,

danke für die Antwort.

Das würde also bedeuten:

Range("Range("E2"):15000) ????

Answer 4

ich habes gerade versucht mit

range("range("e2").value:15000")

funzt leider nicht

Answer 5

ich habes gerade versucht mit

range("cells(2,5).value:15000")

funzt leider auch nicht

Answer 6

Hallo Saharra,

nein, mit den Befehlen erhältst Du den Inhalt der angesprochenen Zellen.

Diesen könntest Du dann einer Variablen zuweisen.

Z.B.
intZahl=Range("E2").Value oder
intZahl=Cells(2,5).Value

wobei Du die Variable vorher deklarieren musst

DIM intZahl as Integer

Was hast Du den eigentlich vor, mit Deiner Frage?

Gruss
Rainer

Answer 7

hi all ^^

ein beispiel

gruss nighty

Sub Addierung()
Dim DeineVariable As Double
DeineVariable = Application.WorksheetFunction.Sum(Range("E2:E15000"))
End Sub

Answer 8

Hallo hallo,

sorry dassich mich erst jetzt melde, aber ich war im Osterurlaub.

Also, ich möchte

Range("ZelleE2:15000").Select

und dann den ganzen Bereich löschen.

Wobei in ZelleE2 steht, ab welcher Zeile gelöscht werden soll.

Z.B. steht in ZelleE2 8000. Folglich löscht Excel den Bereich von Zeile 8000 bis 15000

Rows("ZelleE2:15000").Select[u]

Macht wahrscheinlichmehr Sinn.

Answer 9

Hallo saharra,

eine Möglichkeit wäre:

Option Explicit

Sub loeschen()
Range(Range("E2").Value & ":" & 15000).ClearContents
End Sub

Gruß
Rainer

Answer 10

Nachtrag

wenn Du nicht die Inhalte, sondern die ganzen Zeilen löschen willst, dann ersetze ClearContents durch Delete

Gruß
Rainer