LibreOffice Kommentar einer Zelle auslesen

Zum Erstellen eines Serienbriefs benötige ich nicht nur die Inhalte der Zellen, sondern auch die Kommentare der Zellen. Leider habe ich bisher keine Möglichkeit gefunden, wie dies automatisch geht. Deshalb habe ich mir ein halbaufwändiges Workaround ausgedacht. Neben die Spalte mit den Kommentarzellen erstelle ich eine weitere Spalte, in die ich als Text den Namen der Kommentarzelle schreibe. Daneben kommt eine weitere Spalte, in der ich in jeder entsprechenden Zelle meine Funktion aufrufe. In der eigentlichen Tabelle sind diese beiden Spalten dann auf unsichtbar eingestellt, um die Übersicht zu behalten.

'Die Funktion kann mit 2 Möglichkeiten aufgerufen werden:
'1. indem in einer Zelle =getcomment("A1") geschrieben wrid. Es wird der Kommentar der Zelle A1 ausgegeben.
'2. indem in einer Zelle =getComment(A1) gerschrieben wird, wobei in A1 als Strig die Zelle mit dem Kommentar steht
Function getComment(incell As String) As String 'incell - aus welcher Zelle der Kommentar genommen werden soll, kann auch auf eine Zelle mit Stringinhalt (B5) zeigen
 Dim oSheets As Variant 'aktuelles Tabellenblatt
 Dim oCellRangesByName As Variant 'Arrayindizes für incell
 Dim oCell As Variant 'Kommentarzelle als Objekt
 Dim oAnnotation As Variant 'Kommentarobjekt
     
 On Error Resume Next 'Falls ein Fehler auftritt soll mit der nächsten ANweisung weiter gemacht werden
 oSheets = thisComponent.getCurrentController.activesheet 'ermittelt aktuelles Tabellenblatt

 oCellRangeByName = oSheets.getCellRangeByName(incell) 'liefert Arraywerte der des Stringinhalts von incell z.B. B2 => 1,1
 oCell = oCellRangeByName(0).getCellByPosition(0,0) 'ermittelt Zelle für incell
 getComment = oCell.getAnnotation().getString() 'liest den Kommentar aus und gibt ihn als Rückgabewert der Funktion zurück
End Function

(Quellcode-Highlighter)

Freizeitkarten kostenloser Eintritt

Auf der Suche nach einer schönen Urlaubsregion bin ich auf Freizeitkarten, Rabattkarten oder Erlebniskarten gestoßen. Meine Liste ist sicher nicht vollständig. Falls noch jemand einen Tipp hat, bitte melden.

• Passaucard
• Nordhessen GrimmHeimatCard
• Luxembourg-Card
• Ruhrtopcard
• RheinlandCard
• Nuernberg-Card
• ErzgebirgsCard
• Thueringencard
• Bremer Erlebniscard 
• UlmCard 
• SchwarzwaldCard 
• BambergerLandCard 
• Aktivcard Bayerischer Wald
• Allgaeu Walser Card
• Oberbayern-Card 
• Bregenzerwald Gäste-Card 
• Österreich Burgenland-Card
• Schweizer Übersicht

Linux Ubuntu - Plötzlich keine sudo Rechte mehr

Auf einmel konnte ich unter Ubuntu keine Programme mehr installieren, weil ich nicht mehr in der sudoers Datei aufgeführt war. Der Vorfall wird gemeldet, wurde mir gesagt. Ich fragte mich nur, wem denn? Ich bin ja eigentlich der Admin, hmm. Folgende Anleitung hat mir geholfen: http://www.redirect301.de/ubuntu-sudo-probleme.html

Hier verkürzt zusammengefasst:

Neustart +  Shift-Taste drücken
Erweiterte Optionen -> Recovery Mode _> zur root Befehlszeile

Folgende Befehle nacheinander ausführen:
mount -o remount,rw /
usermod -aG sudo Benutzername
shutdown -r now

Was die einzelnen Befehle genau machen, beschreibt Daniel auf seiner Seite. Ich übernehme keine Garantie, dass dann auch alles so funktioniert, wie es soll, aber mir hat es so geholfen.

Panasonic Er-1611 Scherkopf reparieren, auseinandergefallen

Nachdem mir der Rasierer aus der Hand gefallen ist und in ca. 4 Einzelteilen auf dem Boden lag, musste ich herausfinden, wie ich das Puzzle wieder zusammen gesteckt bekomme. Dabei bin ich in einem groooßen Internetshop mit A auf den hilfreichen Kommentar von R. Schumann gestoßen: "Was da wohl häufig herausspringt ist die Federschlaufe in der Mitte. Um die wieder richtig einzusetzen empfehle ich (hat bei mir am besten geklappt), den schwarzen Scheerkopf von der Feder trennen. Feder auf Spannung einführen und hinterher mit einem kleinen Hebel (Schraubendreher langt) langsam drunterschieben und die beiden Enden wieder einrasten lassen. Zack 50Euros gespart."
So ungefähr habe ich es auch gemacht, es ging auch ohne Werkzeug. Feder und unteres weißes Teil zusammen einsetzen, dabei in der Mitte die Feder unter den schwaren Haken. Danach vorsichtig die Federenden etwas anheben, um das Messer mit der oberen weißen Halterung darunter zu positionieren. Dann in den großen Kopf einlegen und am Rasierer die mittlerste Höheneinstellung auswählen, um alles hineinzudrücken.

Sitzplatz für Kinder gestalten - Kinderschreibtisch

Auf der Suche nach dem richtigen Tisch für einen Schulanfänger bin ich auf die Seite Nullbarriere gestoßen.

Das Wichtige noch einmal für uns von dort:

Durchschnittliche Körperhöhe, Sitzfläche, Tischhöhe

Quelle: DIN EN 1729-1:2006-09 Möbel - Stühle und Tische für Bildungseinrichtungen - Teil 1: Funktionsmaße
In der DIN sind Höhen für Stühle und Tische aufgeführt. Berücksichtigt wird das dynamische Sitzen durch unterschiedlich zulässige Sitzwinkelund Maße für sehr große Schüler.

Maße für Stühle und Tische DIN EN 1729; Maße in cm

Körpergröße ohne Schuhe	Sitzhöhe	Sitztiefe	Sitzbreite	Tischhöhe	Tischplatte Tiefe x Länge
80-95	21	22,5	21	46
93-116	26	25	24	46	50x60
108-121	31	27	28	53	50x60
119-142	35	30	32	59	50x60
133-159	38	34	34	64	50x60
146-176,5	43	38	36	71	50x60
159-188	46	42	38	76	50x60
174-207	51	46	40	82	50x60

Empfohlene Montagehöhen von Sanitärobjekten für Kinder bis ca. 12 Jahren:

• Waschtisch/Handwaschbecken 65x70 cm
• Klosettbecken 35 cm
• Urinalbecken 50x55 cm
• Brausekopf 150 cm

[Quelle VDI 6000 Blatt 1]

Kindermaße (in cm)

Alter		1	2	3	4	5	6	7	8	9	10	11	12	13	14
a	Körpergröße	75	85	94	102	109	115	122	128	133	138	143	148	153	158
b	Augenhöhe	64	74	83	91	96	103	108	111	115	119	124	128	133	137
c	Schulterhöhe	54	63	72	79	85	90	95	98	102	106	110	114	118	122
d	Armweite	65	77	89	97	104	110	116	122	127	133	138	143	148	153
e	Reichweite nach oben	90	100	112	121	129	136	142	147	153	159	165	171	177	183
f	Reichweite nach unten	28	32	35	39	42	45	48	50	52	54	56	58	60	62
g	Reichweite nach vorn	30	36	42	48	52	57	61	63	65	68	71	73	75	77
h	Höhe Handlauf	38	40	42	45	49	55	57	x)	x)	x)	x)	x)	x)	x)
i	Höhe Tischfläche	40	42	43	46	48	51	53	55	57	59	61	64	66	68
k	Höhe Sitzfläche Stuhl	19	22	25	28	30	32	34	35	36	38	39	41	42	44
		x) für dieses Alter keine Angab

Ubuntu Videos umbenennen nach Aufnahmedatum Exif Script MTS

Nach langer Suche habe ich aufgegeben, ein benutzerfreundliches Tool zu finden, dass mir bei der Benennung von Videodateien hilft. So habe ich mir ein Script geschrieben, dass meine MTS-Dateien umbenennt:



#!/bin/bash

# meine Dateiendung ist aktuell MTS, und nur dieses Dateien sollen umbenannt werden, falls in dem Ordner noch andere Dateien liegen sollten
dateiendung=MTS

# eine Schleife über alle Dateien in dem aktuellen Ordner
for datei in *.${dateiendung}
do

# exiftool liest mir das Datum und die Zeit aus, an dem das Video bearbeitet worden ist, das ist bei mir auch das Erstelldatum
# exiftool liefert den Wert geführt mit ": " zurück, awk gibt nur alles was danach kommt zurück
# sed -e ist zum Ersetzen von : und Leerzeichen und +0100 im Namen (-e damit sed weiß, dass mehrerer Befehle kommen)
zeit=$(exiftool -FileModifyDate $datei | awk -F ': ' '{print $2}' | sed -e 's/://g' -e 's/ //g'  -e 's/+0100//g' -e 's/+0200//g')

# Ausgabe des alten und neuen Dateinamens für Testzwecke
# echo $datei
# echo ${zeit}.${dateiendung}

# Umbenennen der Datei
mv $datei ${zeit}.${dateiendung}
done

Montessori Giveaway

Katie von Gift of Curiosity verschenkt einen Montessori Kurs für Interessenten, die Kinder im Alter von 2-6 Jahren betreuen wollen. Wer mitmachen möchte, kann dies hier tun: Montessori Giveaway.