Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
856to860
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
856to860
856to860
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Funktion verfügbar machen

Funktion verfügbar machen
20.03.2007 18:31:07
Michael

Hallo,
ich habe folgendes Problem:
ich habe eine Funktion die mir einen EAN-Code anhand einer Artikelnummer ausrechnet:
Public

Function EANCODE(strCode As String)
Dim intI As Integer
Dim intGer As Integer, intUng As Integer
For intI = 1 To 12
strCodeK = "4016598" & strCode
If intI Mod 2 = 0 Then
intGer = intGer + Val(Mid(strCodeK, intI, 1))
Else
intUng = intUng + Val(Mid(strCodeK, intI, 1))
End If
Next
If (intGer * 3 + intUng) Mod 10 = 0 Then
PZ = 0
Else
PZ = 10 - (intGer * 3 + intUng) Mod 10
End If
EANCODE = 4016598 & strCode & PZ
End Function

die Funktion funktioniert auch tadellos! Jedoch möchte ich sie in jeder Excel Tabelle verwenden können. Ich habe sie auch in der PERSNL.XLS abgelegt, die auch im Hintergrund geöffnet wird, kann die Funtion jedoch nicht in anderen Arbeitsmappen verwenden.
Es funktioniert nur wenn ich in der andren datei dann auf das modul der persnl.xls verweise, das hilft mir aber nicht wirklich weiter, ich möchte ja dass die funktion immer zur verfügung steht, als onicht dass ich jedesmal auf irgendetwas verweisen muss oder etwas einfügen muss.
Gibt es eine Möglichkeit?
Vielen Dank im Vorraus
Gruß
Michael

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Funktion verfügbar machen
20.03.2007 18:34:09
Horst
Hi,
platzier die Funktion in einem Add-In, das musst du nur einmalig laden.
mfg Horst
AW: Funktion verfügbar machen
20.03.2007 18:55:57
Michael
und wie funktioniert das?
AW: Funktion verfügbar machen
20.03.2007 18:58:11
Horst
Hi,
die Mappe mit der Fonktion als *.xla speichern.
mfg Horst
AW: Funktion verfügbar machen
20.03.2007 19:55:10
Horst
Hi,
versuch mal, deiene Antwort da zu platzieren, wo sie higehört.
mfg Horst
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige