VB - Excel, einlesen und auf neuer Zelle ausgeben

Computer: Software & Programmierung Programmierung allgemein
1

Hallo Freunde,
ich „spreche“ 8 Programmiersprachen bin aber leider VB Anfänger und benötige nun ein Makro mit dem Werte aus einer Excel-Zelle ausgelesen werden und nach einer einfachen Entscheidungsregel wieder in eine andere Zelle eingefügt werden.

Kann mir jemand weiterhelfen?

Gruß georg

2

Hallo Georg !!

Also ( das alles setzt voraus, das Du die Arbeitsmappe und die Tabelle aktiviert hast, in der die Daten stehen ) :

' Zellenwert auslesen
Var1=Cells(Reihe,Spalte).Value
' Zellenwert zuweisen
Cells(Reihe,Spalte).Value=Var1
' Arbeitsmappe aktivieren
Workbooks("(ArbeitsmappeName)").Activate
' Tabelle aktivieren
Sheets("(TabellenName)" oder Index).Select

Ich hoff das hilft dir weiter …
Als Tipp ( falls Du’s noch nicht weisst )…
Die meisten Sachen bei VBA lernt man durch Makro-Aufzeichnen…
Mach einfach die gewünscht Aktion und schau Dir an wie das Makro aussieht…
Bei Cells- und Range-Objecten ist das zwar etwas doof, weil da immer mit direkter Indizierung gearbeitet wird…
Also statt wie ich geschrieben hab

cells(1,1)

ständ dann da

range("A1")

…

Aber wenn Du schon Programmiererfahrung hast ist das eigentlich kein Thema, da die Online-Hilfe wie ich finde, meist sehr hilfreich ist…

Gruss Brain