Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Die Suche hat 11580 Ergebnisse ergeben.
Seite 490 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 487, 488, 489, 490, 491, 492, 493 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Index
Autor Nachricht
  Thema: Hintergrundbild 
Phelan XLPH

Antworten: 1
Aufrufe: 473

BeitragForum: Word Formate   Verfasst am: 25. Jan 2010, 14:49   Titel: Hintergrundbild Version: Office 2003
Hallo ihr lieben Helfer,

ich habe folgendes Problem:
Ich benötige ein Hintergrundbild als Wasserzeichen und das nur auf der ersten
Seite das auch ausgedruckt werden kann.
Ich erstelle damit ein Deckblatt.

Kenne mich mit Word leider nicht so aus. Wie kann ich das realisieren?
Hat da jemand eine Idee?

Danke schon mal....
  Thema: Aktualisierung einer anderen Datei 
Phelan XLPH

Antworten: 4
Aufrufe: 349

BeitragForum: Excel VBA (Makros)   Verfasst am: 25. Jan 2010, 11:39   Titel: AW: Aktualisierung einer anderen Datei Version: Office 2007
Wo sind die Profis? Wie löst ihr denn sowas?
  Thema: Verhältnis zu einander 
Phelan XLPH

Antworten: 2
Aufrufe: 392

BeitragForum: Excel VBA (Makros)   Verfasst am: 24. Jan 2010, 15:15   Titel: AW: Verhältnis zu einander Version: Office 2007
Das müsste doch mit der Pivottabelle recht gut lösbar sein
  Thema: Gültigkeitsprüfung per VBA mit Kommazahlen 
Phelan XLPH

Antworten: 5
Aufrufe: 2325

BeitragForum: Excel VBA (Makros)   Verfasst am: 24. Jan 2010, 15:13   Titel: AW: Gültigkeitsprüfung per VBA mit Kommazahlen Version: Office 2007
@ r.mueller

klar ist auch ne Möglichkeit. Die Unikate mit Dictionary ermitteln oder
Spezialfilter; in ein anderes Blatt schreiben; eingetragene Werte sortieren
und darauf verweisen.
  Thema: Gültigkeitsprüfung per VBA mit Kommazahlen 
Phelan XLPH

Antworten: 5
Aufrufe: 2325

BeitragForum: Excel VBA (Makros)   Verfasst am: 24. Jan 2010, 14:57   Titel: AW: Gültigkeitsprüfung per VBA mit Kommazahlen Version: Office 2007
Hier ne Lösung mit Sortierung und Unikaten ohne LeerWerte:

ins StandardModul:
Sub ValidationListeSetzen()
Dim rng As Range
Set rng = Range("A2:A10") 'Anpassen********
With Range("A1").Validation
.Delete
.Add Type:=xlValidateList, Formula1:=SortUnikateList(rng.Value)
End With
End Sub

Function SortUnikateList(arr As Variant) As String
Dim i As Long
Dim Dic As Object
Set Dic = CreateObject("Scripting.Dictionary")
For i = 1 To UBound(arr)
If arr(i, 1) <> "" Then Dic(arr(i, 1)) = 0
Next
Erase arr
arr = Dic.Keys
QSort arr, LBound(arr), UBound(arr)
SortUnikateList = Replace(Join(arr, ";"), ",", ".")
SortUnikateList = Replace(SortUnikateList, ";", ",")
End Function

Sub QSort(ByRef arr, low, hi)
D ...
  Thema: Gültigkeitsprüfung per VBA mit Kommazahlen 
Phelan XLPH

Antworten: 5
Aufrufe: 2325

BeitragForum: Excel VBA (Makros)   Verfasst am: 24. Jan 2010, 14:52   Titel: AW: Gültigkeitsprüfung per VBA mit Kommazahlen Version: Office 2007
Das ist auch das Ergebnis der Aufzeichnung >> leider falsch.

Denn als Ergebnis erhalte ich folgendes Bild. Das heisst der TrennOperator
ist ein Komma!!!.

Sub x()
With Range("A1").Validation
.Delete
.Add Type:=xlValidateList, Formula1:="1,2;4,6"
End With
End Sub
  Thema: Gültigkeitsprüfung per VBA mit Kommazahlen 
Phelan XLPH

Antworten: 5
Aufrufe: 2325

BeitragForum: Excel VBA (Makros)   Verfasst am: 24. Jan 2010, 14:38   Titel: Gültigkeitsprüfung per VBA mit Kommazahlen Version: Office 2007
Hallo,

Was muss ich Formula1 zuweisen damit die einzelnen Werte vom
Trennungsoperator "," (Komma) unterschieden wird.

Ich könnte den Umweg gehen über das Setzen eine "." (Punktes).
Dann wird aber die Zelle in ein Datum umformatiert (ist auch logisch),
welches ich aber über das Change-Ereignis abfange und daraus
wieder eine Kommazahl mache.


im Modul1:
Sub x()
With Range("A1").Validation
.Delete
.Add Type:=xlValidateList, Formula1:="1.8,4.2,7.5"
End With
End Sub
im Codefenster der tabelle:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "A1" Then
Application.EnableEvents = False
Target = Val(Target)
Target.NumberFormat = "General"
Application.EnableEvents = True
End If
End Sub

Gibts auch ne andere Möglichkeit, ohne diesen Umweg???
Weiß da jemand was?
  Thema: Option Explicit 
Phelan XLPH

Antworten: 2
Aufrufe: 2091

BeitragForum: Excel VBA (Makros)   Verfasst am: 24. Jan 2010, 13:53   Titel: AW: Option Explicit Version: Office 2003
-VBA-Editor (ALT+F11)
-Extras
-Optionen

>> Variablebdeklaration erforderlich anhaken
  Thema: Combobox2 befüllen, in abhängigkeit zum inhalt aus combobox1 
Phelan XLPH

Antworten: 8
Aufrufe: 401

BeitragForum: Excel VBA (Makros)   Verfasst am: 24. Jan 2010, 13:49   Titel: AW: Combobox2 befüllen, in abhängigkeit zum inhalt aus combo Version: Office 2007
Schau mal nach ComboAbhängigVonCombo2.xls:
http://www.office-loesung.de/ftopic330555_0_0_asc.php
  Thema: Spalten ausblenden wenn bestimmte Zellen nur 0 enthalten 
Phelan XLPH

Antworten: 14
Aufrufe: 4611

BeitragForum: Excel VBA (Makros)   Verfasst am: 24. Jan 2010, 13:34   Titel: AW: Spalten ausblenden wenn bestimmte Zellen nur 0 enthalten Version: Office 2003
@Gerd, ich denk du hast da nen Denkfehler.

Sub SpaltenZeilenAusblenden()
Dim Bereich As Range, c As Range
Set Bereich = Range("D5:AW232") 'Anpassen************************
Application.ScreenUpdating = False
For Each c In Bereich.Columns
c.Hidden = Evaluate("=COUNTBLANK(" & c.Address & ")+COUNTIF(" & c.Address & ",0)=ROWS(" & c.Address & ")")
Next
For Each c In Bereich.Rows
c.Hidden = Evaluate("=COUNTBLANK(" & c.Address & ")+COUNTIF(" & c.Address & ",0)=COLUMNS(" & c.Address & ")")
Next
Application.ScreenUpdating = True
End Sub

Sub SpaltenZeilenEinblenden()
Dim Bereich As Range
Set Bereich = Range("D5:AW232") 'Anpassen************************
Application.ScreenUpdating = False
Bereich.Columns.Hidden = False
B ...
  Thema: Gültigkeit mit VBA in Suchfunktion einbauen 
Phelan XLPH

Antworten: 9
Aufrufe: 1461

BeitragForum: Excel VBA (Makros)   Verfasst am: 24. Jan 2010, 01:21   Titel: AW: Gültigkeit mit VBA in Suchfunktion einbauen Version: Office 2003
Auch ne Variante:

Sub ValidationSetzen()
Dim col As Range
With Worksheets("Tabelle4") 'anpassen
For Each col In .Range("A12:I" & .Cells.Find("*", , , , xlByRows, xlPrevious).Row).Columns
With .Range(.Cells(5, col.Column), .Cells(9, col.Column)).Validation
.Delete
.Add Type:=xlValidateList, Formula1:=SortUnikate(col.Value)
End With
Next
End With
End Sub

Public Function SortUnikate(arr As Variant) As String
Dim SL As Object, i As Long
Set SL = CreateObject("System.Collections.sortedlist")
For i = 1 To UBound(arr)
If arr(i, 1) <> "" Then SL(arr(i, 1)) = ""
Next
For i = 0 To SL.Count - 1
SortUnikate = SortUnikate & "," & SL.GetKey(i)
Next
If SortUnikate <> "" Then SortUnikate = Mid ...
  Thema: Aktualisierung einer anderen Datei 
Phelan XLPH

Antworten: 4
Aufrufe: 349

BeitragForum: Excel VBA (Makros)   Verfasst am: 24. Jan 2010, 00:33   Titel: AW: Aktualisierung einer anderen Datei Version: Office 2007
Danke erst mal, wenn sonst noch jemand Ideen hat, nur raus damit.... Smile
  Thema: Namen aus Excel-Sheet in VBA verwenden 
Phelan XLPH

Antworten: 6
Aufrufe: 9914

BeitragForum: Excel VBA (Makros)   Verfasst am: 23. Jan 2010, 00:00   Titel: AW: Namen aus Excel-Sheet in VBA verwenden Version: Office 2003
MsgBox Evaluate(ThisWorkbook.Names("wert").Value)
  Thema: Wie alle Zelle einer bestimmten Hintergrundfarbe aufsummiere 
Phelan XLPH

Antworten: 8
Aufrufe: 348

BeitragForum: Excel VBA (Makros)   Verfasst am: 22. Jan 2010, 23:44   Titel: AW: Wie alle Zelle einer bestimmten Hintergrundfarbe aufsumm Version: Office 2007
Werde trotzdem nicht ganz schlau draus.

Wieso nicht gleich nach Zahlen Summieren?!

Macht für mich nur Sinn falls manuell die Hintergrundfarbe gesetzt wird, und
die Summe gewünscht wird.
  Thema: Wie alle Zelle einer bestimmten Hintergrundfarbe aufsummiere 
Phelan XLPH

Antworten: 8
Aufrufe: 348

BeitragForum: Excel VBA (Makros)   Verfasst am: 22. Jan 2010, 23:31   Titel: AW: Wie alle Zelle einer bestimmten Hintergrundfarbe aufsumm Version: Office 2007
@Thomas

in Excel 2007 ist die Farbpalette größer, es gibt mehr Abstufungen.
Könnte bei Verwendung des Colorindex Probleme geben. M.E.
 
Seite 490 von 772 Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7 ... 487, 488, 489, 490, 491, 492, 493 ... 766, 767, 768, 769, 770, 771, 772  Weiter
Gehe zu:  
Alle Zeiten sind
GMT + 1 Stunde

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Word Serienbriefe