Hallo Janik,
Mit Find gibst du ein Range-Objekt zurück, sofern etwas gefunden wurde. Um nun auf die benachbarte Zelle zuzugreifen gibts die Offset-Eigenschaft. Beispiel: IF NOT VornameTest Is Nothing THEN Set NachnameTest = VornameTest.Offset(0, 1)
Allerdings kann es sein, dass ein Vorname mehrfach vorkommt. Deshalb solltest du eine Schleife einbauen, die alle Zellen mit dem gesuchten Vornamen durchläuft. Wie du das am besten machst kannst du in der Online-Hilfe zur Find-Methode nachlesen.
Gruß Mr. K.
|