BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das LibreOffice Forum zu erhalten!

❤️ DANKE >><< DANKE ❤️

> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des LibreOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗

Fehlermeldung "Prozedur oder Funktion nicht defeniert

CALC ist die Tabellenkalkulation, die Sie immer wollten.
Antworten
mmadr
Beiträge: 2
Registriert: Mo 19. Sep 2022, 15:26

Fehlermeldung "Prozedur oder Funktion nicht defeniert

Beitrag von mmadr » Mo 19. Sep 2022, 15:31

Hallo, bin das erste mal hier und benötige eure Hilfe..

wenn ich folgende Zeilen in einen Marcro schreibe und einen Wert einer Zelle zuordnen möchte. bekomme ich immer die Fehlermeldung "Prozedur oder Funktion nicht defeniert....

Ziel ist, das in der Zelle A1 Test erscheint


Sub HalloUser
Dim strName As String
strName = ("Test")
'' print strName

Range("A1").Tabelle1 = strName

end sub


was mache ich falsch ??

HeritzP
Beiträge: 899
Registriert: Mo 9. Dez 2013, 19:08

Re: Fehlermeldung "Prozedur oder Funktion nicht defeniert

Beitrag von HeritzP » Mo 19. Sep 2022, 19:09

Hallo,

ein Link zu Dannenhöfer.

Wie bekomme ich Zugriff zu einer Zelle?
HeritzP

alles nur geklaut

mmadr
Beiträge: 2
Registriert: Mo 19. Sep 2022, 15:26

Re: Fehlermeldung "Prozedur oder Funktion nicht defeniert

Beitrag von mmadr » Mo 19. Sep 2022, 19:40

Alles klar, vielen Dank...

PS. Doch komplizierter wie in Excel 8-)

Benutzeravatar
karolus
Beiträge: 2170
Registriert: Fr 10. Dez 2010, 10:01

Re: Fehlermeldung "Prozedur oder Funktion nicht defeniert

Beitrag von karolus » Mo 19. Sep 2022, 21:04

mmadr hat geschrieben:
Mo 19. Sep 2022, 19:40
Alles klar, vielen Dank...

PS. Doch komplizierter wie in Excel 8-)
So, so … ist es das :roll: … dein geratener Phantasie-code würde auch in Excel nicht funktionieren.

Code: Alles auswählen

Option VBASupport 1

Sub HalloUser
	Dim strName As String
	strName = ("Test")
	with worksheets("Tabelle1")
		.Range("A1") = strName
	end with
end sub
LO7.4.7.2 debian 12(bookworm) auf Raspberry4b 8GB (64bit)
LO7.6.3.2 flatpak debian 12(bookworm) auf Raspberry4b 8GB (64bit)

An alle, die das LibreOffice-Forum nutzen:


Bitte beteiligen Sie sich mit 7 Euro pro Monat und helfen uns bei unserem Budget für das Jahr 2024.
Einfach per Kreditkarte oder PayPal.
Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet.

❤️ Vielen lieben Dank für Ihre Unterstützung ❤️

Antworten