Top-Themen

Aktuelle Themen (A bis Z)

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 Eigentlich einfache WENN-Bedingung, klappt aber nicht

Mitglied: trmanky

trmanky (Level 1) - Jetzt verbinden

06.09.2011, aktualisiert 13:56 Uhr, 3120 Aufrufe, 2 Kommentare

Hallo IT-Gemeinde,
ich hänge immernoch über meiner Excel-Tabelle, diesmal mit einem neuen Problem.

Wie auch im Thema "Daten in bestimmte Zeile eintragen" geht es um die Datenbank für ein neues Produkt.
Ich habe eine Tabelle in die mithilfe von zwei Formularen Daten eingegeben werden.

Wenn nun mit dem ersten Formular (=Montage des Produkts) eine Seriennummer für das Gerät usw erstellt und eingetragen wurde, möchte ich im zweiten Formular (=Testlauf-Protokoll) ein DropDown-Menü haben, welches die eingetragenen Geräte-SNs enthält.
Nun hatte ich zuvor einfach auf die Spalte mit dem Geräte-SNs verwiesen, doch nach genauerem Überlegen, ist das nicht sehr sinnvoll. Man muss sich vorstellen, dass diese Tabelle für mehrere Monate benutzt wird, dadurch kommt natürlich eine große Masse an Daten zusammen. Das DropDown-Menü würde sehr lang werden, und man müsste ewig lang, nach der entsprechenden SN suchen. Daher möchte ich dieses DropDown-Menü anders gestalten.

Dabei weiß ich aber noch nicht genau wie. Es sollen auf jeden Fall nur die Geräte-SNs im DropDown erscheinen, von denen noch kein Testlauf vorhanden ist. Wenn der Testlauf durchgelaufen ist, habe ich eine Spalte in der Tabelle die man als "Bedingung" benutzen könnte, nämlich die "Test bestanden"-Spalte.

Nun ist meine Frage, wie kann ich diese Zelle bei jedem Datensatz sinnvoll einsetzen? Ich hatte schon an SVERWEIS gedacht, aber da ich die Tabelle von oben nach unten aufbaue, also jedes Mal eine neue Zeile einfüge, würde sich die Formel jedes Mal mit verschieben. Das klappt also nicht.

Habt ihr irgendwelche anderen Ideen?

VG
Mitglied: bastla
06.09.2011 um 14:52 Uhr
Hallo trmanky!

Du könntest versuchen, die verwendete "ComboBox" über eine Schleife zu befüllen (Stichwort "AddItem") ...

Grüße
bastla

P.S.: Wie hier ein "SVERWEIS()" nützen könnte, kann ich mir nicht so richtig vorstellen ...
Bitte warten ..
Mitglied: trmanky
06.09.2011 um 15:50 Uhr
Hi bastla,

habe nicht ganz verstanden, was du meinst, aber ich was ähnliches hingebastelt, auch mit ner Schleife:

01.
Sub Schleife() 
02.
03.
' Schleife Makro 
04.
05.
'Kopieren der Rekorder-SN 
06.
Sheets("Montage").Select 
07.
Range("D5").Select 
08.
Selection.Copy 
09.
 
10.
'Wechseln zur Startzelle in Hilfstabelle 
11.
Sheets("Testprotokoll").Select 
12.
Range("N4").Select 
13.
 
14.
'Beginn der While-Schleife bis leere Zelle gefunden 
15.
While Selection <> "" 
16.
ActiveSheet.Cells(ActiveCell.Row + 1, ActiveCell.Column).Activate 
17.
Wend 
18.
'Wenn leere Zelle gefunden, SN hineinkopieren 
19.
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _ 
20.
        SkipBlanks:=False, Transpose:=False 
21.
 
22.
End Sub
Hier benutze ich eine Hilfstabelle, die ich mit der Schleife, die nach leeren Zellen sucht, sauber und ordentlich halte.

Nach jedem Neueintrag über das Montage-Formular wird dieses Makro mitausgelöst.
Und nach jedem Ausführen des Testprotokoll-Fomulars wiederum wird ein anderes Makro ausgeführt:

01.
Sub zweite_SN_Liste() 
02.
' suchen Makro 
03.
Dim i As Integer 
04.
' Suchen 
05.
For i = 4 To 4000 
06.
If Cells(i, 14) = Cells(5, 4) Then 
07.
 
08.
Range("N" & i).Select 
09.
Selection.ClearContents 
10.
 
11.
On Error Resume Next 
12.
End If 
13.
Next 
14.
End Sub
Damit wird die SN die gerade getestet wurde, aus der Liste wieder gelöscht.

Dadurch, dass das mit einer Schleife läuft, habe ich keine Lücken in der DropDownliste, die sich ja auf diese generierte Hilfstabelle bezieht.

Danke für die Hilfe

VG
Bitte warten ..
Ähnliche Inhalte
Server

Einfache .htaccess-Weiterleitung klappt nicht

gelöst Frage von itebobServer4 Kommentare

Moin, ich möchte, dass beim Abrufen der Adresse diese Seite geladen wird. Ich habe etliche Variationen erfolglos getestet. Hier ...

Cluster

Wie funktioniert eigentlich ein Failovercluster?

Frage von PumpkinCluster8 Kommentare

Hallo, Ich habe die Aufgabe ein Failovercluster aufzubauen. Folgende Punkte sind mir schon bekannt: Server muss eingebunden werden. Klon ...

LAN, WAN, Wireless

Wie heißt das eigentlich richtig?

gelöst Frage von questioLAN, WAN, Wireless6 Kommentare

Moin, schreib gerade eine Doku über den aufbau eines LAN. Immer wieder verwende ich das Wort "Datendose", was sich ...

Windows 8

Wie ticken eigentlich W8-Apps?

Frage von keine-ahnungWindows 86 Kommentare

Moin an Alle, mal eine Frage aus der Trivialspielzeugkiste. Windows 8.1 bringt seine Touch-apps mit, zum Grossteil eher sinnloser ...

Neue Wissensbeiträge
Windows 10

USB Maus und Tastatur versagen Dienst unter Windows 10

Tipp von hardykopff vor 6 MinutenWindows 10

Da steht man ziemlich dumm da, wenn der PC sich wegen fehlender USB Tastatur und Maus nicht bedienen lässt. ...

Administrator.de Feedback
Update der Seite: Alles zentriert
Information von Frank vor 2 StundenAdministrator.de Feedback8 Kommentare

Hallo User, die größte Änderung von Release 5.8 ist das Zentrieren der Webseite (auf großen Bildschirmen) und ein "Welcome"-Teaser ...

Humor (lol)

WhatsApp-Nachrichten endlich auch per Bluetooth versendbar

Information von BassFishFox vor 20 StundenHumor (lol)4 Kommentare

Genau darauf habe ich gewartet! ;-) Der beliebte Messaging-Dienst WhatsApp erhält eine praktische neue Funktion: Ab dem nächsten Update ...

Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 1 TagGoogle Android3 Kommentare

Hier eine Information, die für Administratoren und Verantwortliche in Unternehmen, die für die Beschaffung und das Rollout von Android-Geräten ...

Heiß diskutierte Inhalte
Server-Hardware
Welche Rolle spielt Design bei Enterprise IT Hardware?
Frage von ApolloXServer-Hardware17 Kommentare

Ich arbeite für einen internationalen Elektronikhersteller in der Forschung und meine Aufgabe ist es, Feedback von Nutzern in Hinsicht ...

Windows Netzwerk
WSUS4 und Windows 10 Updates automatisch installieren
Frage von sammy65Windows Netzwerk15 Kommentare

Hallo miteinander, ich habe mit einen neuen WSUS Server aufgesetzt Server 2016 darauf einen aktuellen WSUS. Grund, wir stellen ...

Speicherkarten
Vergessliche USB-Sticks?
Frage von hanheikSpeicherkarten14 Kommentare

Ich habe in den letzten Tagen 500 USB-Sticks mit Bilddateien bespielt. Obwohl ich die Dateien mit größter Sorgfalt kopiert ...

Switche und Hubs
Cisco SG350X-48 AdminIP in anderes VLAN
Frage von lcer00Switche und Hubs14 Kommentare

Hallo zusammen, ich habe ein Problem mir einem Cisco SG350X-48 bei der Erstinstallation wurde eine IP 192.168.0.254 (Default VLAN ...