Deine Office 2010 Suite: Professional / Professional plus
Add Ins und/oder Zusatz-Programme installiert: Nein
Version:

Betriebssystem Version: windows 7
Welches Virenschutz-Programm hast Du installiert? avira

Was hast Du gemacht, bevor das Problem aufgetreten ist?
Ausgangstabelle geändert

Was hast Du bereits versucht um das Problem zu lösen?
probiert aber ohne Erfolg

Fehlerbeschreibung und Nachricht
SVERWEIS
Ich benutze SVERWEIS für Rechnungen, klappt alles wunderbar. Nun möchte ich, wenn sich z. B. eine Artikelbezeichnung ändert,
von Version 1 auf Version 2 nicht alle alten Rechnungen, in denen Version 1 steht, aktualisiert werden,
sondern hier die Version stehen bleibt und in den neuen Rechnungen die Version 2 steht. Klar ich könnte im Tabellenblatt
aus dem die Daten gezogen werden, eine weitere Artikelbezeichnung einfügen und das Problem wäre gelöst.
Aber hat jemand einen Hinweis, ob es möglich ist SVERWEIS so zu nutzen,
dass nur aktuelle Daten geändert werden (habe schon an Blatt- und Zellenschutz gedacht klappt aber nicht)
oder kann mir jemand eine andere Funktion empfehlen?
Danke für Eure Hinweise.

nur wenige sehen Deine Datei und können mit der Beschreibung was anfangen.

Gruß Hajo

Hallo edding,
wie wäre es mit einer Wenn-Kombination und Sverweis? In der Wenn-Abfrage das Datum der Änderung eingeben.

Gruß Amethyst

Hallo,
wie Amethyst bereits geschrieben hat könnte man den Sverweis mit einer Wenn oder einer anderen Funktion kombinieren oder aber evtl. auch Index und Vergleich nutzen.
Allerdings ist mir ein wenig flau beim Gedanken, dass Du Rechnungen erstellst und diese danach auf änderbar hast indem Du Formeln beibehälst.

Aber denkbar wäre zB so ein Konstrukt

Distanz

	A	B	C	D	E	F	G
1
2
3			Art	0	01.01.2010	01.07.2010	01.01.2011
4			Messer	1,00 €	2,00 €	3,00 €	4,00 €
5			Gabel	5,00 €	6,00 €	7,00 €	8,00 €
6			Schere	9,00 €	10,00 €	11,00 €	12,00 €
7			Licht	13,00 €	14,00 €	15,00 €	16,00 €
8
9
10			Art	Datum	Preis
11			Messer	01.02.2009	1,00 €
12			Gabel	01.02.2010	6,00 €
13			Schere	20.10.2010	11,00 €
14			Licht	01.01.2011	16,00 €
15			Schere	16.04.2011	12,00 €
16			Licht	02.07.2010	15,00 €
17			Messer	02.07.2010	3,00 €
18			Gabel	12.06.2010	6,00 €
19

Formeln der Tabelle

Zelle Formel E11 =INDEX($C$3:$G$7;VERGLEICH(C11;$C$3:$C$7;0);VERGLEICH(D11;$C$3:$G$3;1)) E12 =INDEX($C$3:$G$7;VERGLEICH(C12;$C$3:$C$7;0);VERGLEICH(D12;$C$3:$G$3;1)) E13 =INDEX($C$3:$G$7;VERGLEICH(C13;$C$3:$C$7;0);VERGLEICH(D13;$C$3:$G$3;1)) E14 =INDEX($C$3:$G$7;VERGLEICH(C14;$C$3:$C$7;0);VERGLEICH(D14;$C$3:$G$3;1)) E15 =INDEX($C$3:$G$7;VERGLEICH(C15;$C$3:$C$7;0);VERGLEICH(D15;$C$3:$G$3;1)) E16 =INDEX($C$3:$G$7;VERGLEICH(C16;$C$3:$C$7;0);VERGLEICH(D16;$C$3:$G$3;1)) E17 =INDEX($C$3:$G$7;VERGLEICH(C17;$C$3:$C$7;0);VERGLEICH(D17;$C$3:$G$3;1)) E18 =INDEX($C$3:$G$7;VERGLEICH(C18;$C$3:$C$7;0);VERGLEICH(D18;$C$3:$G$3;1))

Hallo,
als Amerkung zu ae's Bedenken, die berechtigt sind: Rechnungen grundsätzlich zusätzlich als pdf speichern und elektronisch auch nur so verschicken.

Gruß Amethyst

ae, danke für den Hinweis den ich sehr ernst nehme, Rechnungen haben ihre Besonderheit,
Betriebsprüfung, Finanzamt, war halt ein schlechtes Beispiel ,
Kann Deine Formel aber sehr gut nutzen!
Manchmal ist man halt betriebsblind Amethyst, Deine Anmerkung wird umgesetzt.
Da schließt sich meine nächste Frage an, eine Excelarbeitsmappe als pdf zu speichern,
kein Problem. Kann ich auch ein einzelnes Tabellenblatt, nehmen wir an ich führe
"alle Rechnungen" in einer Arbeitsmappe, mit fortlaufender Nummer, als pdf speichern?

Hallo,
ja, das geht.
Du könntest zB eine Hilfstabelle machen in der die Rechnungdsnummer hochgezählt wird.

Zeichne einfach mal ein Makro auf, in dem Du die Rechnung zuerst in eine neue leere mappe kopierst.
Dann als pdf speichern.

Diesen vom Rekorder erzeugten Quellcode musst Du dann noch entsprechend anpassen

Andreas, brauche bitte noch einmal Deine Hilfe.
Makro läuft nur bis zur Kopie in eine leere Arbeitsmappe. Wenn ich von dort
wetergehe, mir den Path aussuche, einen Namen vergebe, das Blatt als *.pdf
speichern will kommt diese Meldung.
"Das Dokument wurde nicht gespeichert! Das Dokument ist möglicherweise geöffnet,
oder beim Speichern ist ein Fehler aufgetreten."
Das Makro ist nur bis zur Ausführung der Kopie aufgezeichnet.
Ich glaube, ich muss noch EINIGES lernen

Hallo,
einfach den Code separat aufzeichnen und dann anpassen

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\Administrator\Desktop\Mappe1.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False

Der Dateiname muss natürlich über eine Variable erzeugt werden, da Du sonst ja immer den selben verwendest

Sorry ich packs nich,
seprate Aufzeichnung führ zur selben Fehlermeldung.
Mein code sieht jetzt so aus:
Sub expdf()
'
' expdf Makro
'
' Tastenkombination: Strg+x
'
Sheets("010 (2)").Select
Sheets("010 (2)").Copy
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Greiner\\2011\Mappe1.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False

End Sub