Ich hatte mich Mitwoch ein 1. Date mit einer Frau. Ich schrieb ihr danach das ich es schön fand, sie zurück ja es war mal schön dich auch so in Real kennenzulernen. Denkt ihr sie hat interesse an einem 2. Treffen?

Hallo an alle,

Mein HNO Arzt hat bei einer Untersuchung mittels Ultraschall Knoten in der Schilddrüse festgestellt ( war eigtl wegen etwas anderes da). Er meinte er schreibt nur einen Brief an den Hausarzt und es könnte in einiger Zeit evtl Probleme machen, aber ich sollte erstmal nur wieder kommen wenn ich Beschwerden hab. Sollte ich mir da jetzt größere Sorgen machen bzw evtl auch Ernährung umstellen ( trinke keine tierische Milch da ich die nicht so vertrage)?

Danke euch schonmal. :)

Hallo an alle ich hab seit knapp 4 Wochen einen kleinen knubbel am hals der nicht sichtbar sondern hautfarben ist Und nur ertastbar ist. Das unten darunter ist ein pickel. Weiß jemand was das sein könnte?

Ich möchte die Dokumente im Serienbrief einzeln automatisch speichern mittels Makro und habe das unten angefügte Makro dafür auch gefunden aber es funktioniert bei mir noch nicht sondern debugt immer und zeigt Fehler in der Variable an. Ich hab auch den Pfad schon auf mein Dokument angepasst. Muss ich evtl noch den Dateinamen ändern?

Sub Test()
 '
 ' Serienbrief in einzelnen Word Dokumenten speichern
 '
 Dim Dateiname As String
 Dim LetzterRec As Long
     
 Application.ScreenUpdating = False
 Application.Visible = False

 Const path As String = "C:\Test\"          'Pfad anpassen
 ActiveDocument.MailMerge.DataSource.ActiveRecord = wdLastRecord
 LetzterRec = Word.ActiveDocument.MailMerge.DataSource.ActiveRecord
 ActiveDocument.MailMerge.DataSource.ActiveRecord = wdFirstRecord


     With ActiveDocument.MailMerge
         .DataSource.ActiveRecord = wdFirstRecord
         Do
             If .DataSource.ActiveRecord > 0 Then
                If .DataSource.DataFields("VorNachname").Value <> "0" Then
                     .Destination = wdSendToNewDocument
                    .SuppressBlankLines = True

                     With .DataSource
                         .FirstRecord = .ActiveRecord
                         .LastRecord = .ActiveRecord
                
                         Dateiname = path & .DataFields("VorNachname").Value & ".docx"
                
                     End With
                        .Execute Pause:=False
                 
                         ActiveDocument.SaveAs FileName:=Dateiname           'Speichern unter Dateiname
                        ActiveDocument.Close False
                 End If

               End If
               
             If .DataSource.ActiveRecord < LetzterRec Then
                 .DataSource.ActiveRecord = wdNextRecord
             Else
                 Exit Do
             End If
         Loop
     End With
     
     Application.Visible = True
     Application.ScreenUpdating = True
 End Sub

Hallo an alle:)

Ich wollte mal Fragen, ab welcher Größe hat geleitete und große Poren und hab ich große Poren?

LG

Vielen Dank im Voraus

Hallo liebe Comunity, ich nehme seit 2 Monaten Aknenormin. Denkt ihr das mein Gesicht Aufgedunsen ist? im Beipackzettel konnte ich dazu nix finde

Hallo findet ihr das ich ein dickes Gesicht habe, vom Gewicht her bin ich im normalen Bereich. 66kg 1,78m und 21 Jahre