Templates by BIGtheme NET
Willkommen, Gast
Benutzername: Passwort: Angemeldet bleiben:

THEMA:

cx.System.ExcelDaten() 26 Aug 2023 18:04 #13

  • daywalker
  • daywalkers Avatar Autor
  • Offline
  • Platinum Boarder
  • Platinum Boarder
  • Beiträge: 849
  • Dank erhalten: 615
Lieber Stefan.

Vielen Dank! Funktioniert so einwandfrei.

lg Christian
 

Bitte Anmelden oder Registrieren um der Konversation beizutreten.

cx.System.ExcelDaten() 27 Apr 2024 21:28 #14

  • daywalker
  • daywalkers Avatar Autor
  • Offline
  • Platinum Boarder
  • Platinum Boarder
  • Beiträge: 849
  • Dank erhalten: 615
Hallo lieber Stefan.

In dem Kontext versuche ich in Zelle C2 des 1. Tabellenblatts die Formel =LINKS("Hallo";2) einzufügen. Leider kommt eine kleine Fehlermeldung.

cX4Web cX4Web Code

Was ist das?

1 *** Excel_Formel
2
3 Wenn (? Unwahr: '[cX.System.ExcelDaten(-2;;?)]')
4 Setze in [cX.System.ExcelDaten(-2;;NV)]: ''
5 Ende Wenn
6
7 Setze in [cX.System.ExcelDaten(-1;1;A)]: ''
8 Setze in [cX.System.ExcelDaten(C2;;F)]: '=LINKS("Hallo";2)'

cX4Web Code: Einfach anklicken zum Kopieren und in click.EXE 5.0 einfügen


  (8 Zeilen, cX 5.0.10.5)


lg Christian

Bitte Anmelden oder Registrieren um der Konversation beizutreten.

cx.System.ExcelDaten() 28 Apr 2024 08:29 #15

  • daywalker
  • daywalkers Avatar Autor
  • Offline
  • Platinum Boarder
  • Platinum Boarder
  • Beiträge: 849
  • Dank erhalten: 615

daywalker post=4233 schrieb: Hallo lieber Stefan.

In dem Kontext versuche ich in Zelle C2 des 1. Tabellenblatts die Formel =LINKS("Hallo";2) einzufügen. Leider kommt eine kleine Fehlermeldung.

cX4Web cX4Web Code

Was ist das?

1 *** Excel_Formel
2
3 Wenn (? Unwahr: '[cX.System.ExcelDaten(-2;;?)]')
4 Setze in [cX.System.ExcelDaten(-2;;NV)]: ''
5 Ende Wenn
6
7 Setze in [cX.System.ExcelDaten(-1;1;A)]: ''
8 Setze in [cX.System.ExcelDaten(C2;;F)]: '=LINKS("Hallo";2)'

cX4Web Code: Einfach anklicken zum Kopieren und in click.EXE 5.0 einfügen


  (8 Zeilen, cX 5.0.10.5)


lg Christian


 

Als Zusatzinfo hier noch leicht veränderte Skriptzeilen mit Bildschirmfoto.

cX4Web cX4Web Code

Was ist das?

1 *** Excel_Formel
2
3 Wenn (? Unwahr: '[cX.System.ExcelDaten(-2;;?)]')
4 Setze in [cX.System.ExcelDaten(-2;;NV)]: ''
5 Ende Wenn
6
7 Setze in [cX.System.ExcelDaten(-1;1;A)]: ''
8 *** Falsches Zeichen in der Formel
9 Setze in [cX.System.ExcelDaten(3;2;F)]: '=Heute()'
10 *** Funktioniert
11 Setze in [cX.System.ExcelDaten(3;3;F)]: '=(2*3)'

cX4Web Code: Einfach anklicken zum Kopieren und in click.EXE 5.0 einfügen


  (11 Zeilen, cX 5.0.10.6)


 


lg Christian
Anhänge:

Bitte Anmelden oder Registrieren um der Konversation beizutreten.

cx.System.ExcelDaten() 28 Apr 2024 11:13 #16

  • daywalker
  • daywalkers Avatar Autor
  • Offline
  • Platinum Boarder
  • Platinum Boarder
  • Beiträge: 849
  • Dank erhalten: 615
Liebe CX User

Hier noch ein kleines Beispiel um sich an dem vielseitigen und hilfreichen Platzhalter zu versuchen.

cX4Web cX4Web Code

Was ist das?

1 *** System.Excel.Daten
2
3 *** Hier wird doppelt geprüft ob Excel schon aktiv bzw. geöffnet ist,¶Da es bei mir ab und zu vorkommt, das eine Excel "Prozessleiche"¶im Hintzergrund hängt und dann das Skript einen Fehler produziert.¶An sich sollte ein WENN ausreichen aber ich scheitere an der ":" ODER Bedingung.¶¶Vielleicht schafft es ja wer....
4 Wenn (? Unwahr: '[cX.Prozess(*Excel*).Name]=EXCEL'), ""
5 Setze in [cX.System.ExcelDaten(-2;;NV)]: ''
6 Wenn (? Unwahr: '[cX.System.ExcelDaten(-2;;?)]')
7 Setze in [cX.System.ExcelDaten(-2;;NV)]: ''
8 Ende Wenn
9 Ende Wenn
10
11 *** Setzt in Zeile 2 des Tabellenblattes die Farbe 10 (Grün)
12 Setze in [cX.System.ExcelDaten(-3;2;B)]: '10'
13 *** Setzt in Spalte E die Farbe 'LightPink' als Hintergrund
14 Setze in [cX.System.ExcelDaten(-4;5;B)]: 'LightPink'
15 *** Schreibt Text in Zeile 2 (Zelle A2)
16 Setze in [cX.System.ExcelDaten(-3;2;TX)]: '"Zeilenhintergrundfarbe:cX.System.ExcelDaten(-3;2;)=10"'
17 *** Bringt Spalte A automatisch per VBA auf Textbreite
18 Setze in [cX.System.ExcelDaten(-2;;VBA)]: 'Columns("A").EntireColumn.AutoFit'
19 *** Schreibt Text in Spalte E (Zelle E1)
20 Setze in [cX.System.ExcelDaten(-4;5;TX)]: '"Spaltenhintergrundfarbe:cX.System.ExcelDaten(-4;5;B)=LightPink"'
...

cX4Web Code: Einfach anklicken zum Kopieren und in click.EXE 5.0 einfügen


  (22 Zeilen, cX 5.0.10.5)


Hinweis: Bei besonderem Lizenzerfordernis, bitte das Skript im Volltestmodus ausführen.

Gruss Christian

 

Bitte Anmelden oder Registrieren um der Konversation beizutreten.

cx.System.ExcelDaten() 28 Apr 2024 12:32 #17

  • Stefan
  • Stefans Avatar
  • Offline
  • Administrator
  • Administrator
  • Beiträge: 1158
  • Dank erhalten: 1689
Hallo, Christian!

Das Setzen einer Formel hat noch den kleinen Haken, dass dies in englisch erfolgen muss.
In deinem Fall setze "=Today()", dann klappt das.

Dies gilt auch für die Notation, also Komma statt ;:
Setze in [cX.System.ExcelDaten(C2;;F)]: '=Left("Hallo",2)'
Auch das klappt!

Werde mir das aber noch ansehen, das geht bestimmt auch in deutsch...!

Liebe Grüße
Stefan
Folgende Benutzer bedankten sich: daywalker, Siebald

Bitte Anmelden oder Registrieren um der Konversation beizutreten.

cx.System.ExcelDaten() 28 Apr 2024 12:36 #18

  • daywalker
  • daywalkers Avatar Autor
  • Offline
  • Platinum Boarder
  • Platinum Boarder
  • Beiträge: 849
  • Dank erhalten: 615
Hallo Stefan.

Vielen Dank für die Info.
Und hat funktioniert. 

lg Christian
und noch einen schönen Sonntag

Bitte Anmelden oder Registrieren um der Konversation beizutreten.

Letzte Änderung: von daywalker.

Community

Wir benutzen Cookies

Wir nutzen Cookies auf unserer Website. Diese Cookies sind essenziell für den Betrieb dieser Website. Sie können selbst entscheiden, ob Sie die Cookies zulassen möchten. Bitte beachten Sie, dass bei einer Ablehnung womöglich nicht mehr alle Funktionalitäten der Seite zur Verfügung stehen.

Sie sind noch nicht Mitglied unserer Community? Melden Sie sich jetzt an!

Anmelden