Hier noch die Bilder der Frage und die Seite des Tabellenbuches.
Vielen lieben Dank für eure Hilfe :)
Hier noch die Bilder der Frage und die Seite des Tabellenbuches.
Vielen lieben Dank für eure Hilfe :)
Hier noch das Bild zur Aufgabe.
Ich habe diesen Code in meinem Bericht als Datensatzquelle angegeben. Allerdings bekomme ich keine Ausgabe in meinem Bericht. Wenn ich die selben Daten als Abfrage starte und über die Parameterabfrage von Access treffe, werden mir die richtigen Daten ausgegeben. Kann es sein, dass Access meine Datumseingabe von den zwei Textboxen nicht erkennt?
https://www.dropbox.com/sh/mvq9grje2wo2kkp/AACOTm08dv6D3rKi3xSXuMRca?dl=0
Hier ein Link zu den Bilder. Ich könnte es leider nicht über die App hochladen.
Es handelt sich um folgende Boxen.
Hat keiner ne Antwort?
Habs schon gefunden :)
The str_replace() function replaces some characters with some other characters in a string.
try something like this:
$x->str_replace("_normal","",$x)
Danke trotzdem an alle die helfen wollten:)
Hach Ja,
ne Runde in der Stadt rumlaufen, drei Kaffee getrunken, nochmal rangesetzt und zack funktioniert es beim ersten Versuch.
Für alle die es noch brauchen.
start "IMM" %imm% -quality 50 "%%a" -path g:\hier\jetzt\dein\pfad "%%a"
Danke für alle Antworten.
p.s. kann ich mir eig selber nen Stern geben :P
irgendwie hats die Formatierung nicht übernommen
AM besten in ein Programm wie Notepad++ reinkopieren =)
Frag mal bei den Wasserwerken nach ;) Da ist es sehr wahrscheinlich, dass du was bekommst :)
Warum startest du die Konsole nicht einfach über das GUI wenn jemand dran sitzt?
Gruß John
Eine der besten Serien. Da Die 5te Staffel die letzte ist, kannst du es ruhig gucken ;)
Empfehlung von mir.
EIn Glitch ist ein Fehler in einem Spiel zu deinem Vorteil. Also zb bei Battlefield gabs es mal den Fehler, dass wenn du an einen bestimmten Punkt der Map gegangen bist, dich keiner mehr abschießen konnte.
Dass ist ein Glitch
Hier nochmal der Code:
Option Explicit
Sub Neuer_Monat()
Application.ScreenUpdating = False
Dim inZeile As Integer
Dim inMonat As Integer
Dim inTage As Integer
'x = InputBox("Eingabe des Startdatums", "Neuen Monat anlegen", Datum)
'Range("A53").Value = Datum
'Anzahl Tage des aktuellen Monats
'AnzTage = DateSerial(Year(x), Month(x) + 1, 1) - DateSerial(Year(x), Month(x), 1) 'Auslesen des Datums der Inputbox
'Range("W2").Value = AnzTage 'Anzeige des Datums in Zelle W2
If IsDate("01." & Range("R1") & "." & Range("Y1")) Then
inMonat = Month("01." & Range("R1") & "." & Range("Y1"))
Select Case inMonat
Case 1, 3, 5, 7, 8, 10, 12
inTage = 31
Case 4, 6, 9, 11
inTage = 30
Case 2
If Range("Y1") Mod 400 = 0 Then
inTage = 29
ElseIf Range("Y1") Mod 100 = 0 Then
inTage = 28
ElseIf Range("Y1") Mod 4 = 0 Then
inTage = 29
Else
inTage = 28
End If
End Select
'Zellen mit Werten füllen
For inZeile = 3 To inTage + 3
Cells(3, inZeile) = inZeile - 3
Cells(4, inZeile) = Format(CDate(Cells(4, inZeile) & "." & Range("R1") & "." & Range("Y1")), "ddd")
Next inZeile
Else
' B11 und A11 ergeben keinen Datumswert
MsgBox "Bitte ein Monat und Jahr korrekt eingeben", vbCritical, "Achtung!"
End If
' Bildschirmaktualisierung ein
Application.ScreenUpdating = True
End Sub
Mach es bitte nicht. Die Augen sind sehr empfindlich. Nicht auszuschließen, dass da irgendwas angegriffen wird.
Was hast du denn genau vor ? Mikrofon Aufnahme und dann auf dem PC bearbeiten ?
Garnicht und das ist auch gut so. Das ganze nennt sich Datenschutz, und wäre Müll. Oder fändest du es gut, wenn dein Chef wüsste, dass du mit dem Chef der Konkurierenden Firma schreibst, oder die Eifersüchtige Freundin kontrolliert, mit welchen Leuten du schreibst?