Thema Datum  Von Nutzer Rating
Antwort
06.09.2008 00:10:48 Andreas
NotSolved
07.09.2008 17:55:44 Holger
NotSolved
Rot Aw:Aw:vba code
 07.09.2008 21:58:23 samn
NotSolved
09.09.2008 16:30:51 andreas
NotSolved

Ansicht des Beitrags:
Von:
samn		 Datum:
07.09.2008 21:58:23		 Views:
876		 Rating:
     
Antwort:
  Ja
Thema:
Aw:Aw:vba code
hallo holger! war meine erste anfrage in so einem forum. hätte nicht gedacht, dass gleich so schnelle und kompetente hilfe kommt. werde das ding gleich ausprobieren. mfg ae

Holger schrieb am 07.09.2008 17:55:44:

Hallo Andreas,
z.B.
Application.DisplayAlerts = False
a = MsgBox("Wurde gewünschter Bereich markiert?", vbYesNo)
If a = vbNo Then Exit Sub
With Selection
rstart = .Row
rend = .Rows.Count + rstart - 1
cstart = .Column
cend = .Columns.Count + cstart - 1
End With
For i = cstart To cend
For j = rstart To rend
If Cells(j, i) = "S" Then
a = Cells(j, i + 1)
With Range(Cells(j, i), Cells(j, i + 1))
.HorizontalAlignment = xlCenter
.MergeCells = True
End With
Cells(j, i) = Cells(j, i) + a
End If
Next j
Next i
Application.DisplayAlerts = True

Gruß
Holger



Andreas schrieb am 06.09.2008 00:10:48:

hallo! ich hätte eine frage: ich möchte auf einem tabellenblatt in einem bestimmten bereich alle zellen die den Wert S enthalten mittels makro markieren und mit der nachfolgenden zelle rechts verbinden und dabei mittig formatieren. kann mir jemand mitteilen, wie der code dazu aussieht? danke für die hilfe mfg a

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
06.09.2008 00:10:48 Andreas
NotSolved
07.09.2008 17:55:44 Holger
NotSolved
Rot Aw:Aw:vba code
 07.09.2008 21:58:23 samn
NotSolved
09.09.2008 16:30:51 andreas
NotSolved