Guten Tag,
ich bin ein Makroneuling und brauche eure Hilfe.
Ich habe eine Liste, die in der A-Spalte jeweils den Standort enthält (entweder IN oder BRX). Jetzt soll ich ein Makro schreiben, dass erst nach einem Standort sucht (das hätte ich per Inputbox gemacht) und dann die komplette Zeile ins PDF konvertiert. So dass ich dann eine Liste im PDF mit nur einem Standort habe. Irgendwie funktioniert das bei mir nicht so. Ich kopiere euch mal mein (nicht-funktionierendes) Makro. Ich hoffe ihr könnt mir helfen.
Sub Makro1()
Dim standort As String
Dim leftrange As Variant
Dim suchname As String
Dim x As Variant
standort = InputBox(„Bitte Standort eingeben“)
Set leftrange = Range(„A2:A1000“)
suchname = standort
For Each x In leftrange
Set zelle = Range(„A2:A1000“).Columns(1).Find(suchname, LookIn:=xlValues)
zelle.Select
If x = standort Then
Application.ActivePrinter = „PDF-ConverterPro auf Ne01:“
Selection.PrintOut Copies:=1, ActivePrinter:=„PDF-ConverterPro auf Ne01:“, _
Collate:=True
End If
Next x
End Sub
Gruß
Simone