AddIn macht ärger

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: AddIn macht ärger
von: Herbert Grom
Geschrieben am: 21.09.2015 11:42:43

Hi,
in dem AddIn habe ich folgenden Code in einem StdModul:

Sub Auto_Open()
   Dim DLLPath$, iRow%, sCol$
   
   iRow = shFunctions.Cells(shFunctions.Rows.Count, 1).End(xlUp).Row
   sCol = Chr(shFunctions.Cells(1, Columns.Count).End(xlToLeft).Column + 64)
   sCol = "A2:" & sCol & iRow
   
   DLLPath = ThisWorkbook.Path & "\Brandschutz.dll"
   
   If Dir(DLLPath) = "" Then
      MsgBox "Die Datei  ""Brandschutz.dll""  ist nicht installiert! " & _
         vbLf & "Bitte installieren Sie sie!", vbOKOnly + vbExclamation, "Brandschutz"
      Exit Sub
   End If
   Application.RegisterXLL ThisWorkbook.Path & "\Brandschutz.dll"
   Run [FunCustomize], ThisWorkbook.Name, shFunctions.Range(sCol)
End Sub

In der Zeile "sCol = Chr(shFunctions...." bleibt er mit der folgenden Fehlermeldung stehen:
"Die Methode 'Columns' für das Objekt '_Global' ist fehlgeschlagen."
Allerdings nicht auf meinem Rechner, sondern nur auf einem externen Firmenrechner. Habt Ihr evtl. eine Idee, woran das liegen kann?
Vielen Dank im Voraus.
Servus

Bild

Betrifft: Den Ärger verursacht der Programmier...
von: EtoPHG
Geschrieben am: 21.09.2015 11:46:01
Herbert... ;-)
...und der müsste den Fehler eigentlich sehen, wenn er mal einen Blick auf die vorherige Codezeile wirft ;-)

Chr(shFunctions.Cells(1, shFunctions.Columns.Count).End(xlToLeft).Column + 64)

Gruess Hansueli

Bild

Betrifft: AW: AddIn macht ärger
von: Rudi Maintaire
Geschrieben am: 21.09.2015 11:56:35
Hallo,
nebenbei: Ich finde das grenzwertig. Bei Spalten jenseits von Z ergibt es einen Fehler.

    iRow = shFunctions.Cells(shFunctions.Rows.Count, 1).End(xlUp).Row
    iCol = shFunctions.Cells(1, shFunctions.Columns.Count).End(xlToLeft).Column
    sCol = "A2:" & Cells(iRow, iCol).Address(0, 0)
Gruß
Rudi

Bild

Betrifft: AW: AddIn macht ärger
von: Herbert Grom
Geschrieben am: 21.09.2015 12:06:23
Hi Hansueli,
hi Rudi,
vielen Dank! Und Ihr habt natürlich recht, der Fehler sitzt, wie fast immer, VOR dem PC! ;o)=)
Zwischenzeitlich habe ich sogar noch herausgefunden, warum das bei mir immer klappt und bei machen Anderen nicht. Wenn beim Sterten von Excel noch keine Arbeitsmappe geöffnet ist, kann er auch keine Spalten zählen in einem "globalen" Sheet. Deshalb muss man ihm den Sheet-Namen, in dem er die Spalten zählen soll, zwei mal angeben, dann klappt's auch mit dem Zählen! ;o)=)
Servus
P.S.: Rudi, Du hast Post!

Bild

Betrifft: HG hat Post owT
von: Rudi Maintaire
Geschrieben am: 21.09.2015 12:35:52


Bild

Betrifft: Welcher HG? ;-) (owT)
von: EtoPHG
Geschrieben am: 21.09.2015 13:26:18


Bild

Betrifft: der Bayer, der mir ...
von: Rudi Maintaire
Geschrieben am: 21.09.2015 14:16:18
Hallo Hansueli,
... geschrieben hat, dass ich Post habe.
Ist mir doch glatt durchgerutscht, dass du dich auch angesprochen fühlen könntest.
Gruß
Rudi

Bild

Betrifft: AW: HG hat noch keine Post owT
von: Herbert Grom
Geschrieben am: 21.09.2015 15:06:12
...

Bild

Betrifft: müsste aber 3x
von: Rudi Maintaire
Geschrieben am: 21.09.2015 15:15:18


Bild

Betrifft: AW: jetzt ja, aber alle 3 im Spamordner! ;o)=)
von: Herbert Grom
Geschrieben am: 21.09.2015 15:42:36
yyy

Bild

Betrifft: ...das nennt man Freunde ;-) (owT)
von: EtoPHG
Geschrieben am: 21.09.2015 16:41:14


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Excel Liste mit Kalender"