Collapse column

Beiträge anzeigen

Diese Sektion erlaubt es dir alle Beiträge dieses Mitglieds zu sehen. Beachte, dass du nur solche Beiträge sehen kannst, zu denen du auch Zugriffsrechte hast.


Nachrichten - franzbrötchen

Seiten: [1]
1
Excel / Office 2010: VBA "Rahmenlinie zeichnen" auswählen und Format vorgeben
« am: Mai 22, 2018, 16:00:39 Nachmittag »
Hallo zusammen,

eine kurze Frage auf die ich bisher keine Antwort finden konnte: gibt es eine Möglichkeit die Funktion "Rahmenlinie zeichnen" in Excel über ein Makro anzusteuern? Ich würde gerne die Rahmenart (Stärke =fett) und Farbe (rot) vorgeben und dann über ein Makro den Stift anzeigen lassen. Geht das?

Danke!

Viele Grüße

2
PowerPoint / Antw:Office 2010: Einfügeoptionen anpassen
« am: Oktober 25, 2017, 19:33:51 Nachmittag »
Jemand eine Idee?  :-\
Google ist leider keine große Hilfe...
Danke!!

3
PowerPoint / Office 2010: Einfügeoptionen anpassen
« am: Oktober 19, 2017, 21:47:17 Nachmittag »
Hallo zusammen,

ich rätsel schon etwas länger mit folgendem Problem und würde mich freuen, wenn mir jemand weiterhelfen könnte :)

Also, ich muss sehr häufig Excel-Tabellen in PowerPoint als Verknüpfung einfügen (Inhalte einfügen > Verknüpfung einfügen > Microsoft Excel-Diagramm-Objekt). Diesen Schritt würde ich gerne etwas beschleunigen.

Lassen sich z.B. die Einfügeoptionen individualisieren? Wenn ich auf der PowerPoint Folie einen Rechtsklick mache, erscheinen die Einfügeoptionen. Dort ist aber leider die Verknüpfungs-Option nicht mit dabei. Kann man dies anpassen?

Oder gibt es alternativ einen anderen Weg diesen Schritt zu beschleunigen?

Vielen Dank im Vorraus für eure Hilfe!!

Beste Grüße

4
Excel / Antw: VBA Tabelle formatieren
« am: Juli 05, 2017, 18:05:20 Nachmittag »
Habs jetzt so gelöst, dass ich gesagt habe ALLES rechtsbündig und nur die linke Spalte linksbündig über Selection.Columns(1).HorizontalAlignment = xlLeft

Danke trotzdem!

5
Excel / Antw: VBA Tabelle formatieren
« am: Juli 05, 2017, 13:39:53 Nachmittag »
Moin,
Danke für deine Antwort.

Meine Tabellen sind immer unterschiedlich groß und als Standardformatierung brauche ich die erste Spalte immer in Schriftgröße 12 und alle Spalten rechts daneben in Schrift 10. Dies würde ich gerne über ein Makro lösen (spart die Handarbeit). D.h. unabhängig davon wie groß der Bereich ist den ich auswähle (also mal nur 2 Spalte und 4 Zeilen groß oder auch größere Tabellen) soll die oben genannte Formatierung angewandt werden.

6
Excel / VBA Tabelle formatieren
« am: Juli 05, 2017, 13:06:09 Nachmittag »
Hallo zusammen,

ich würde gern den Bereich, den ich in Excel auswähle (mal nur 1 Spalte breit und 3 Zeilen, mal 10 Spalten und 40 Zeilen) wie folgt anpassen: Die Erste Spalte soll immer Schriftgröße 12 haben und alle Spalten daneben (also ab Spalte 2) immer Schriftgröße 10.

Ich habe mal mit nachfolgendem Code angefangen. Ist allerdings nicht so elegant und bisher auf 4 Zeilen (und bei dem Loop von 2 bis 256) beschränkt. Habt ihr eine Idee wie man das schlauer/dynamischer lösen kann??

Danke :)

Sub Textgröße()
Selection.Font.Size = 12
For i = 2 To 256
    Selection.Cells(1, i).Font.Size = 10
    Selection.Cells(2, i).Font.Size = 10
    Selection.Cells(3, i).Font.Size = 10
    Selection.Cells(4, i).Font.Size = 10
Next i
End Sub

7
Excel / Desgin-Farben (Dokumentendesign) in RGB Farben ändern
« am: Juni 26, 2017, 20:54:06 Nachmittag »
Guten Abend zusammen,

gibt es eine Möglichkeit (z.B. VBA Makro) um die Farben die über ein Dokumentendesign (Farbpalette) ausgewählt wurden in RGB Code zu ändern? Ich habe derzeit das Problem, dass ich ein Dokumentendesign und eine individuelle Farbpalette verwenden (bzw. verwenden muss). In dem Moment wo ich jedoch das Design ändere oder ich die Excel verschicke und jemand damit arbeitet der nicht mein Design hat, ändern sich alle Fülfarben in den Zellen. Daher würde ich gerne z.B. mit einem Makro alle Farben der Farbpalette die in einem Tabellenblatt verwendet wurden in die entsprechenden RGB Codes ändern, sodass die Farbe immer gleich bleibt und sich nicht mehr ändert.

Habt ihr eine Idee? Danke!!

8
Einen ersten Ansatz habe ich hier gefunden, kann ihn aber leider noch nicht so richtig auf meine Anforderungen übertragen
Quelle: http://www.vbaexpress.com/kb/getarticle.php?kb_id=359

Option Explicit
 
Sub TwoSheetsAndYourOut()
    Dim NewName As String
    Dim nm As Name
    Dim ws As Worksheet
     
    If MsgBox("Copy specific sheets to a new workbook" & vbCr & _
    "New sheets will be pasted as values, named ranges removed" _
    , vbYesNo, "NewCopy") = vbNo Then Exit Sub
     
    With Application
        .ScreenUpdating = False
         
         '       Copy specific sheets
         '       *SET THE SHEET NAMES TO COPY BELOW*
         '       Array("Sheet Name", "Another sheet name", "And Another"))
         '       Sheet names go inside quotes, seperated by commas
        On Error GoTo ErrCatcher
        Sheets(Array("Copy Me", "Copy Me2")).Copy
        On Error GoTo 0
         
         '       Paste sheets as values
         '       Remove External Links, Hperlinks and hard-code formulas
         '       Make sure A1 is selected on all sheets
        For Each ws In ActiveWorkbook.Worksheets
            ws.Cells.Copy
            ws.[A1].PasteSpecial Paste:=xlValues
            ws.Cells.Hyperlinks.Delete
            Application.CutCopyMode = False
            Cells(1, 1).Select
            ws.Activate
        Next ws
        Cells(1, 1).Select
         
         '       Remove named ranges
        For Each nm In ActiveWorkbook.Names
            nm.Delete
        Next nm
         
         '       Input box to name new file
        NewName = InputBox("Please Specify the name of your new workbook", "New Copy")
         
         '       Save it with the NewName and in the same directory as original
        ActiveWorkbook.SaveCopyAs ThisWorkbook.Path & "\" & NewName & ".xls"
        ActiveWorkbook.Close SaveChanges:=False
         
        .ScreenUpdating = True
    End With
    Exit Sub
     
ErrCatcher:
    MsgBox "Specified sheets do not exist within this workbook"
End Sub

9
Ein Nachtrag: das Kürzel "export_" würde ich gerne in der neu erstellten Arbeitsmappe löschen. Das also die Tabellenblätter anstatt export_Analyse1, export_Analyse2 nur noch Analyse1 und Analyse2 heißen  :)

10
Liebe Community,

ich hoffe ihr könnt mir bei nachfolgendem Problem weiterhelfen. Meine Google Suche und Selbstversuche haben mich leider nicht weitergebracht  :-\ Und zwar würde ich gerne folgendes VBA Makro basteln:

(1) aus dem geöffneten bestehenden Workbook möchte ich über ein Makro alle Tabellenblätter in eine neu zu erstellende Arbeitsmappe exportieren, die das Kürzel „export_“ vorne stehen haben. Also z.B. nur die Tabellenblätter export_Analyse1, export_Analyse2 sollen in die neue Arbeitsmappe exportiert werden (ohne die bestehende Arbeitsmappe zu verändern). 

(2) In der neuen Arbeitsmappe würde ich gerne alle Formeln der ursprünglichen Tabellen beibehalten, die Verknüpfungen zur alten Mappe sollen jedoch gelöscht werden (harte Werte, keine Verlinkung).

(3) Im Anschluss die neue Arbeitsmappe mit dem Namen „Export“ und dem aktuellen Datum im Ordner speichern, in dem die Ursprungsdatei (aus der die Tabellenblätter exportiert wurden) liegt.

Wäre wirklich genial, wenn mir einer von euch weiterhelfen kann. Ist wahrscheinlich für euch eine Sache von 1 Minute, aber ich hänge mich hier wirklich auf.  :D :D

Vielen Dank!!

11
Excel / Office 2010: Formel in markierter Zelle durch Makro (VBA) ändern
« am: April 20, 2017, 18:35:09 Nachmittag »
Hallo  VBA-Pros ;-)

als VBA Laie, der sich erst langsam in die Materie einarbeitet, habe ich ein wahrscheinlich für euch  zu lösendes Problem. Und zwar würde ich gerne folgendes durch ein Marko erreichen:

Die Zelle A1 enthält z.B. die Formel =A2/A3. Wenn nun beispielsweise die Zelle A3 keinen Wert oder 0 enthält, würde die Zelle A1 den Fehler #DIV/0! anzeigen. Die Fehleranzeige würde ich gerne durch die wennfehler Funktion ändern in, z.B. die Text-Anzeige "Fehler" oder "keine Angabe". Dies ist als klassische Formel ja kein Problem. Nun arbeite ich aber sehr häufig mit solchen Kalkulation und würd gerne die Funktion wennfehler automatisch über ein Makro einfügen. Also meine : ein Makro, dass bei der markierten/ausgewählten Zelle, hier also A1, automatisch die in der Zelle befindliche Formel mit wennfehler umschließt. Vor Makro also "=A2/A3", nach Makro "=wennfehler(A2/A3;"Fehler").

Habt ihr eine Idee? Ich finde irgendwie keinen Ansatz, leider auch nicht nach Dursuchen der Foren...

Vielen Dank für eure !
LG

12
Excel / Office 2010: Excel Grafiken mit "variablem" senkrechten Trennstrich
« am: Februar 10, 2017, 12:36:55 Nachmittag »
Hallo zusammen,

da ich viel mit Zahlen und deren grafischer Aufbereitung arbeite, habe ich eine Frage an euch, die ich schon seit Wochen versuche zu beantworten. Und zwar erstelle ich häufig Grafiken (Balken-/Liniendiagramme) über einen längeren Beobachtungszeitraum (5-6 Jahre). Die Jahre sind wiederum in 12 Monate unterteilt (x-Achse). Derzeit füge ich manuell eine senkrechte Trennlinie in die Grafik ein um die Jahre optisch zu trennen (also 12 Monate 2015, Trennstrich, dann die nächsten 12 Monate 2016 usw). Kann man diesen mühsamen Prozess irgendwie in Excel automatisieren bzw. flexibel einstellen sodass ein manuelles Einfügen entfällt? Also so, dass die Linie sich auch mitverändert (Position und Größe/Länge) wenn ich das Digramm verändere/vergrößern?

Besten Dank im Voraus!
Frank

13
Excel / Spaltenbreite durch Formel bestimmen (ohne Makro)
« am: Januar 17, 2017, 23:17:01 Nachmittag »
Hallo zusammen,

eine kurze Frage: ich würde gerne durch eine Formel ohne Makro die exakte Zellenbreite einer ausgewählten Zelle auswerten lassen.

Die Formel =ZELLE("breite";A1) gibt mir beispielsweise den Wert "20,00" an, jedoch leider nicht den exakten Wert von eigentlich 20,14 (bzw. 146 Pixel). Gibt es eine Möglichkeit bei dieser Formel auch die Nachkommastellen auszugeben bzw. alternativ eine Angabe in Pixel?

Freue mich auf eure Antworten! Vielen Dank im Voraus.

Beste Grüße
Frank

14
Excel / Antw:Office 2010: flexible Summenformel
« am: Januar 17, 2017, 21:42:00 Nachmittag »
Wow, vielen Dank für die schnelle Antwort!! Das probiere ich sofort aus  :D

Nachtrag: hat wunderbar funktioniert!

15
Excel / Office 2010: flexible Summenformel
« am: Januar 17, 2017, 21:29:37 Nachmittag »
Hallo liebe Office-Profis,

mein Name ist Frank, ich bin ganz frisch im Forum und hoffe auf eure Hilfe. Würde mich sehr freuen, wenn ihr mir bei meinem Problem helfen könntet. Ich sitze nun schon ein paar Stunden an der harten Nuss. Bei der Recherche bin ich dann auf dieses Forum gestoßen - für euch ist das sicher eine Lösung von wenigen Sekunden :D

Zu meinem Problem:
Ich würde die Summen-Formel (über x Spalten) gerne so anpassen, dass ich die letzte Spalte, die in der Summe berücksichtigt werden soll, variabel bestimmen kann.

Beispiel:

Die Zeile 3 enthält in jeder Spalte einen Wert (12 Werte = 12 Spalten); in der Zeile 2 steht darüber jeweils ein Monat von Januar bis Dezember. Nun möchte ich gerne einen bestimmten Zeitraum summieren - wenn ich "März" auswähle, soll der Zeitraum Januar bis März (3 Monate) aufsummiert werden, wenn ich z.B. November auswähle, dann sollen alle 11 Monate summiert werden (Jan-Nov). Dies würde ich gerne über eine Excel-Formel (ohne Makro) lösen. Also z.B. nutze ich Zelle A1 um dort den Monat anzugeben und die Formel soll bezogen auf diese Angabe dann den richtigen Zeitraum summieren.

Mache ich das evtl. mit der "Indirekt"-Funktion? Leider haben alle Versuchen bisher nichts gebracht  :(

Ich hoffe meine Beschreibung ist nicht zu verwirrend.

Ich freue mich sehr auf eure Antworten. Im Voraus bereits vielen lieben Dank für eure Unterstützung!

Beste Grüße
Frank

Seiten: [1]