Excel-Add-in
An dieser Stelle möchte ich nicht Tipps geben, wie man Excel bedienen kann, sondern mein Add-In für Excel zur Verfügung stellen mit einer Reihe von zusätzlichen Funktionen, die das Arbeiten - in meinen Augen - wesentlich erleichtern.
Auflistung der Formeln:
simple Funktionen
Addition von Zahlen innerhalb eines bestimmten Bereiches [Addition_Bereich(Zellen;Untergrenze;Obergrenze;Grenzen miteinbeziehen)]
Subtraktion von Zahlen innerhalb eines bestimmten Bereiches [Subtraktion_Bereich(Zellen;Untergrenze;Obergrenze;Grenzen miteinbeziehen)]
Produkt von Zahlen innerhalb eines bestimmten Bereiches [Produkt_Bereich(Zellen;Untergrenze;Obergrenze;Grenzen miteinbeziehen)]
Ergebnis innerhalb eines Bereiches [Ergebnis_Bereich(Formel;Untergrenze;Obergrenze;Alternativausgabe;Grenzen miteinbeziehen)]
Prozentrechnung - siehe hier
Standardfunktionen erweitert
da die Funktion Kalenderwoche nicht der deutschen DIN Kalenderwoche entspricht, gibt es die Funktion Kalenderwoche_DIN(Datum)
Schaltjahr [Schaltjahr(Jahr)]
X-te Tag (zB Montag) eines Jahres - siehe hier
Ermittlung des ersten Tages einer Kalenderwoche nach DIN 1355
Formeln
Formel einer bestimmten Zelle als String ausgeben [Formel_anzeigen(Zelle)]
Formeln berechnen (Berechnet als String eingegebene Formeln)
Bug von Office 2010 in Bezug auf StrG+# Formel anzeigen behoben
Namensverwaltung
alle Namen in Arbeitsmappe löschen
alle Namen in Tabellenblatt löschen
alle Namen für die ausgewählte Zelle löschen (noch in Arbeit)
Outlook
ganze Tabelle per Email versenden (kann Office mittlerweile)
ganze Tabelle als pdf per Email versenden (kann Office mittlerweile)
einzelnes Tabellenblatt per Email versenden
Speichern
Excel Tabelle als HTML-Seite speichern (kann Office mittlerweile)
Alle Zellen mit Formeln sperren (Blattschutz)
Alle Zellen mit dem Format der aktuellen Zelle sperren (Blattschutz)
analytische Geometrie
Geradengleichung aus 2 Punkten Berechnen
Garadengleichung aus einem Punkt und Steigung
Differential und Integralrechnung
Tangentengleichung anhand der Funktion und der Ableitung erstellen
Sekantengleichung = Geradengleichung aus 2 Punkten berechnen
Tangentensteigung
Sekantensteigung
1. Ableitung in für einen bestimmten Punkt
Zahlenformate (siehe auch hier)
Dezimal => Binärzahl [dec2bin(Zahl)] (Quelle)
Dezimal => Hexadezimal [dec2hex(Zahl)] (Quelle)
Binär => Hexadezimal [bin2hex(String)] (Quelle)
Hexadezimal => Binär [hex2bin(String)] (Quelle)
Dezimal => Duodezimal [dec2duodec(Zahl)] [Wikipedia]
Dezimal => Oktal [dec2oct(Zahl)] [Wikipedia]
Base58 [Wikipedia]
Base62 [Wikipedia]
Base64 [Wikipedia]
Bieredeckelnotation [Wikipedia]
Primzahlen (Quelle)
Testen, ob es sich bei einer Zahl um eine Primzahl handelt [Primzahltest(Zahl)]
Zerlegung in Primfaktoren [Primfaktorn(Zahl)]
Diagramme
Diagrammlinien ein-/ausblenden [Linien_ein_ausblenden(strDiagramm,LineNumber)]
Diagrammlinien ein-/ausblenden anhand des Namens [Linien_ein_ausblenden_byName(strDiagramm,strName)]
Farbe zählen [Farbezählen(Bereich;Farbnummer)]
Farbsumme [Farbsumme(Bereich;Farbnummer)]
ausgewählte Formeln erklärt
Addition von Zahlen innerhalb eines bestimmten Bereiches
Um beispielsweise alle Zahlen innerhalb eines Bereiches die größer sind als 10 und kleiner sind als 15 zu addieren (ohne Grenzen)
Um beispielsweise alle Zahlen innerhalb eines Bereiches die größergleich 10 und kleinergleich 15 sind zu addieren (mit Grenzen)
Diese Formel kann auch sehr nützlich benutzt werden, um nur positive Zahlen zu addieren, oder nur negative usw. Ursprünglich wurde sie entwickelt, um statistische Ausreißer zu entfernen.
Hinweis: die selbe Funktion gibt es auch als Produkt, Substraktion.
Ergebnis innerhalb eines Bereiches
Diese Funktion wurde ursprünglich entwickelt, um Wertetabellen von Funktionen mit vorgegebenen Definitionsbereichen zu zeichnen.
Diagramme
Diagrammlinien mittels Nummer oder Name ein-/ausblenden
Textfeld
Public Sub Linien_ein_ausblenden(strDiagramm As String, LineNumber As Integer) ActiveSheet.ChartObjects(strDiagramm).Activate ActiveChart.SeriesCollection(LineNumber).Select If Selection.Format.Line.Visible = msoTrue Then Selection.Format.Line.Visible = msoFalse ElseIf Selection.Format.Line.Visible = msoFalse Then Selection.Format.Line.Visible = msoTrue End IfEnd SubPublic Sub Linien_ein_ausblenden_byName(strDiagramm As String, strName As String) Dim i As Integer ActiveSheet.ChartObjects(strDiagramm).Activate For i = 1 To ActiveChart.SeriesCollection.Count If ActiveChart.SeriesCollection(i).Name = strName Then ActiveChart.SeriesCollection(LineNumber).Select If Selection.Format.Line.Visible = msoTrue Then Selection.Format.Line.Visible = msoFalse ElseIf Selection.Format.Line.Visible = msoFalse Then Selection.Format.Line.Visible = msoTrue End If End If Next i End Sub
Textfunktionen
Text rechts von Seperator
Public Function text_rechts_von(strText As String, strSep As String) text_rechts_von = Right(strText, Len(strText) - InStr(strText, strSep))End Function
Text links von Seperator
Public Function text_links_von(strText As String, strSep As String) text_links_von = Left(strText, InStr(strText, strSep) - 1)End Function