uh, das ist garnicht so leicht. Es kommt natürlich stark drauf an wie deine Eltern drauf sind. Grundsätzlich würde ich einfach fragen ob es okay wäre, wenn du dir eine Shisha kaufst. Vielleicht lassen sich deine Eltern ja auf einen Deal ein z.B. könnt ihr vereinbaren, dass du nur 2 mal pro Woche Abends einen Topf rauchst. Als "Kontrolle" für deine Eltern können Sie ja den Tabak aufbewahren. So haben deine Eltern die Kontrolle und du kannst trotzdem 2 mal pro Woche dampfen. Viel Erfolg :)

...zur Antwort

du solltest dich grundsätzlich an die Geschwindigkeit-Schilder halten. Wenn es die jeweilige Situation erfordert, solltest du langsamer fahren. Ansonsten gilt: wenn auf diesem Autobahnabschnitt 100km/h erlaubt ist, fährst du auch 100 ;-)

...zur Antwort

das spielt keine Rolle. Es MUSS deine Erstausbildung sein. Dann bekommst du bzw. deine Eltern/Elternteil Kindergeld. Es spielt auch keine Rolle wie viel du in deiner Ausbildung verdienst.

...zur Antwort

also falls ich jetzt deine Frage richtig verstanden habe, brauchst du garkeine 2. FP. Du installierst auf dem Server bspw. die Software OwnCloud und kannst somit von außerhalb auf deine Daten zugreifen, sie ändern, verwalten etc. Oder hab ich deine Frage doch falsch verstanden?

...zur Antwort

TimerCam. Viel Spaß :)

...zur Antwort

Deine "Anforderungen" sind bei weitem nicht "das Maß der PC-Dinge". Aber geh mal von 2500-3000€ aus. Das mit der "Grafikkarte behalten" kannst du gleich mal vergessen. Spätestens nach 1,5 Jahren musst du eine leistungsstärkere GraKa verbauen.

BTW: "das Maß der PC-Dinge" liegt preislich bei ca. 15000€ :-P

...zur Antwort

Vorsicht Leute. Es kann ein Fake sein, muss aber nicht! Sie könnte sich ein paar Euro geschnorrt haben und im Internet-Cafe diese Frage gestellt haben weil sie sonst niemanden Fragen kann. Ist zwar unwahrscheinlich, könnte aber sein. Wer sich wirklich für die Frage interessiert, soll gezielte Gegenfragen stellen. So könnte man feststellen ob die Frage ernstgemeint ist. Werde deshalb diese Frage mal nicht beanstanden.

...zur Antwort

Bin 183 groß und wiege knapp 72kg. Also fast so wie du :) Ich habe im August 2013 mit dem "pumpen" angefangen und dem Ziel, Muskeln aufzubauen und den Körper zu definieren. Ich gehe 3-4 wöchentlich ins Fitnessstudio. Folgenden Ablauf mache ich immer: 15 Minuten Laufband um den Kreislauf zu pushen. Dann 5 Sätze (ein Satz heißt 15 Hiebe) Butterfly vorwärts (Brustmuskulatur) mit ca. 45kg. Dann 5 Sätze Butterfly rückwärts (Rückenmuskulatur) ca. 40kg. Dann 5 Sätze Bizepsmaschine ca. 35kg. Dann 5 Sätze Trizeps ca. 40kg. Dann 5 Sätze Situps und noch ein paar Übungen für den Bauch und Rücken

Dann alles weitere 2-3 mal, jeweils mit mehr Gewicht.

Hat bei mir bis jetzt ganz gut funktioniert und wie gesagt wiege ich jetzt bisschen mehr als 72kg. Im August hab ich noch 67kg. auf die Waage gebracht.

Gibt noch zig andere Möglichkeiten zu trainieren. Dies ist nur mein persönlicher Trainingsplan.

Viele Grüße und viel Erfolg :-)

...zur Antwort

Also ich hätte wirklich mit allem gerechnet jetzt, aber nicht mit so einem Bild. Du bist gepflegt und symphatisch. Scheiß drauf was irgendwelche Leute auf solchen Portalen schreiben. Du kennst sie nicht und sie kennen dich nicht. Dass du nach ein paar Monaten keinen "Erfolg" hast, ist überhaupt nicht schlimm zumal du ja auch "schüchtern" bist. Es gibt Leute die suchen Jahre lang nach einem Partner. Mit deinen paar Monaten bist du noch im grünen Bereich. Wichtig: setz dich nicht unötig unter Druck, das bringt garnix. Geh selbstbewusst, positiv und mutig durchs Leben. Bald begegnest du einer hübschen, netten und ehrlichen Frau die deine positive Art mag bzw. auch liebt.

Bei deinem Aussehen findest du die richtige, glaub mir :-)

....be strong

...zur Antwort

NUR KEIN CLERASIL!!!!!

ich hatte Jahre lang viele und große Pickel im Gesicht. Bin dann mal zum Hautarzt, der hat mir eine verschreibungspflichtige Creme gegeben. Seitdem keine Pickel mehr.

...zur Antwort
VBA Datum erzeugen und formatieren

Hallo zusammen,

eines vorweg: ich bin VBA-Neuling also wenn jemand eine Antwort hat, bitte auf "Singen-und-Klatschen-Niveau" erkläutern :-)

Problemstellung: Ich habe eine Formatvorlage (Word2010) für Reparaturaufgräge erstellt. Diese Vorlage soll auf einem Netzlaufwerk liegen. Wenn ein User die Vorlage öffnet, kann er Sie ausfüllen. Wenn er sie abspeichert, soll als Speichername "Reparaturaufgrag-generierte Nummer-Datum" lauten. das mit der generierten Nummer hab ich soweit mittels INI-Datei auf die Reihe gebracht. Das Datum macht mir nur noch sorgen. In VBA gibt es ja die Variable "Date" diese ist aber mit dd.mm.jjjj formatiert. Ich möchte aber jjjjmmdd haben. Noch dazu kommt, dass das Datum nicht in Einzahl dargestellt werden soll. Beispiel: NICHT 201328 SONDERN 20130208. Im Internet hab ich schon einiges über Datumsformatierung gefunden, aber leider nie das richtige. Bitte helft mir, ich bin am verzweifeln.

Anbei noch mein bisheriger Code:

Private Const Präfix = "Reperaturauftrag_" Private Const INIDatei = "C:\Users\Mustermann\Documents\laufnummer.txt"

Dim Datum As Integer

Sub AutoNew() Dim oDoc As Document, oV As Template

Set oDoc = ActiveDocument Set oV = oDoc.AttachedTemplate aSec = aSec & Left(oV.Name, InStr(oV.Name, ".") - 1) Num = Format(Num, "000000") Num = System.PrivateProfileString(INIDatei, aSec, "Laufnummer") Num = Val(Num) + 1 System.PrivateProfileString(INIDatei, aSec, "Laufnummer") = Num On Error Resume Next oDoc.CustomDocumentProperties.Add Name:="Laufnummer", _ LinkToContent:=False, Value:=Num, Type:=msoPropertyTypeString On Error GoTo 0 For Each Teil In oDoc.StoryRanges Teil.Fields.Update While Not (Teil.NextStoryRange Is Nothing) Set Teil = Teil.NextStoryRange Teil.Fields.Update Wend Next With Dialogs(wdDialogFileSummaryInfo) .Title = Präfix & Num .Execute End With oDoc.Windows(1).Caption = Präfix & Num & "_" & Datum End Sub

Danke im Voraus :-)

...zum Beitrag

So ist es vielleicht übersichtlicher:

Private Const Präfix = "Reperaturauftrag_" Private Const INIDatei = "C:\Users\Mustermann\Documents\laufnummer.txt"

Dim Datum As Integer

Sub AutoNew() Dim oDoc As Document, oV As Template

Set oDoc = ActiveDocument

Set oV = oDoc.AttachedTemplate

aSec = aSec & Left(oV.Name, InStr(oV.Name, ".") - 1)

Num = Format(Num, "000000")

Num = System.PrivateProfileString(INIDatei, aSec, "Laufnummer")

Num = Val(Num) + 1

System.PrivateProfileString(INIDatei, aSec, "Laufnummer") = Num

On Error Resume Next

oDoc.CustomDocumentProperties.Add Name:="Laufnummer", _

LinkToContent:=False, Value:=Num, Type:=msoPropertyTypeString

On Error GoTo 0

For Each Teil In oDoc.StoryRanges

Teil.Fields.Update

While Not (Teil.NextStoryRange Is Nothing)

Set Teil = Teil.NextStoryRange

Teil.Fields.Update

Wend

Next

With Dialogs(wdDialogFileSummaryInfo)

.Title = Präfix & Num

.Execute

End With

oDoc.Windows(1).Caption = Präfix & Num & "_" & Datum

End Sub

...zur Antwort

und was ist jetzt deine Frage?

...zur Antwort

Mach deinen Tag mit Stichwörtern voll. Aber nur Stichwörter die wirklich mit deiner HP zutun haben. Sonst gibts ärger. :)

...zur Antwort

Betriebsystem? 32bit oder 64bit?

...zur Antwort