Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VBA Zeilen abfragen

Frage Entwicklung VB for Applications

Mitglied: VB-NET

VB-NET (Level 1) - Jetzt verbinden

19.12.2008, aktualisiert 13:42 Uhr, 7752 Aufrufe, 2 Kommentare

Hallo Leute,

ich bin gerade dabei ein Makro für eine bestimmte Berechnung zu Programmieren.

Leider ist mein Wissen in VBA sehr gering. Eher in VB.NET, aber das sind ja zwei verschiedene Welten.

Nun zu meinem Problem.

Es ist eine Tabelle mit mehreren Spalten vorhanden.
In Spalte C kann man aus einer DropDown-Box wählen, ob es ein A-Satz oder C-Satz ist.
In Spalte E und F trägt man bestimmte Werte ein.

Jetzt sind ca. 100 Zeilen gefüllt.

Nun soll er die Spalte E überprüfen, ob in der selben Zeile auch C = A-Satz ist. Wenn nicht, dann nächste Zeile usw.
Wenn C = A-Satz ist, dann soll er diesen Wert sich merken -> Summenbildung am Ende.
Wenn er fertig ist, dann soll er in Zeile (z.b. G12) das Ergebnis ausgeben.

Wie bewerkstellige ich das ganze?

Ich muss das am besten über eine For-Schleife laufen lassen, die ein Maximum hat und diesen Vergleich machen.
Das Problem besteht darin, dass ich nicht weiß, wie ich ihm die "Startzeile" angebe und dann fortlaufen lasse.

Vielen Dank im Voraus!

Gruß

VB-NET
Mitglied: NilsErik
19.12.2008 um 16:39 Uhr
Schau Dir mal in der Hilfe den Befehl "Cells(x,y)" an. Damit kannst Du auf einzelne Zellen Zugreifen.
Bitte warten ..
Mitglied: Guenni
19.12.2008 um 23:55 Uhr
@VB-NET

Hi,

als Makro könnte man's so machen:

01.
Private Sub A-SatzSuchen() 
02.
 Zeile = 3 'Oder wo immer auch die Werteliste anfängt 
03.
 Summe = 0 
04.
 While Not IsEmpty(Range("E" & Zeile).Value) 
05.
  If Range("C" & Zeile).Value = "A-Satz" then 
06.
   Summe = Summe + Range("E" & Zeile).Value 
07.
  End If 
08.
  Zeile = Zeile + 1 
09.
 Wend 
10.
 Range("G" & 12).Value = Summe 
11.
End Sub
Da im Schleifenkopf geprüft wird, ob (Spalte E, Zeile x) nicht leer ist,
funktioniert das natürlich nur, wenn die Spalte E keine Leerzeilen enthält.

Gruß
Günni
Bitte warten ..
Ähnliche Inhalte
VB for Applications
gelöst EXCEL VBA Zellen verbinden. MERGE (6)

Frage von Aximand zum Thema VB for Applications ...

VB for Applications
gelöst VBA Excel Skript - Hilfe! (1)

Frage von Compu2017 zum Thema VB for Applications ...

Neue Wissensbeiträge
Tipps & Tricks

Wie Hackt man sich am besten in ein Computernetzwerk ein

(38)

Erfahrungsbericht von Herbrich19 zum Thema Tipps & Tricks ...

Humor (lol)

Bester Vorschlag eines Supporttechnikers ever: APC

(15)

Erfahrungsbericht von DerWoWusste zum Thema Humor (lol) ...

Heiß diskutierte Inhalte
Webbrowser
Windows 7 unbeliebte Internetseite sperren (15)

Frage von Daoudi1973 zum Thema Webbrowser ...

ISDN & Analoganschlüsse
gelöst Splitter - RJ45 zu RJ11? (13)

Frage von Waishon zum Thema ISDN & Analoganschlüsse ...

LAN, WAN, Wireless
gelöst Suche Firmware Image für Cisco Aironet 1252 (10)

Frage von Herbrich19 zum Thema LAN, WAN, Wireless ...

Netzwerke
VLAN Verständnissproblem (9)

Frage von Dragan123 zum Thema Netzwerke ...