Warehouse 13 Mild Mannered Help / RR:Suche

nirgends , weil der neupreis im Laden schon ca. 60€ beträgt.
bei eBay findest du sie gebraucht für 20€

Link:
Lego Starwars Jango Fett 8011 | eBay

die Mini-Figur Jango Fett kriegst du nirgends unter 13 € selbst nicht unter 20,30,40€. Spar ein bisschen mehr und für 50€ hast du viel bessere Chancen

xX_CrYsTaL_Xx aber ich such jango fett als mini Lego Figur und nicht Lego Jango Fett 8011!


-3po

das weiss ich jetzt auch nachdem du das Bild hochgeladen hast

Lego Star Wars 7153 Figur Boba Fett aus Jango Fetts Sl | eBay

IqChamoion3231 aber ich suche Jango nicht Boba fett.



-3po

das ist nicht der Jango Fett , das ist Boba Fett aus Jango Fett's Slave l.

also es gibt viele arten diese figur zu bekommen Z.B. 1. du ziehst irgent einen über den tisch der keine ahnung hat. 2. du suchst bei ebay so lange bis du ihn für 13 € bekommst oder du schaust mal unter den link: BrickLink Price Guide - Minifig sw053 aber ob der preis stimmt bei dem link ist nicht immer sicher. aber ich hoffe ich habe trotzdem geholfen.

What the macro doas: It lists all files in the chosen filesystem. in range A it writes the addres, in range B it writes the filename What i need to be added: in range C it writes the last changedate the matching command must be: ".DateLastModified " i have tried again and again but keep getting error messages-.-
I have the following macro :Option Explicit Private strList() If strTMP = "" Or Left = ":" Then Exit Sub SearchFiles strTMP, "*.*" 'adapt If lngCount = 0 Then MsgBox "No file found" Exit Sub End If With ThisWorkbook.Worksheets.Cells.Clear.Range1, 2lngCount, 2)strList.Cells, CellsstrDir"A:B""Shell.Application"0, "Folder", &H10, 17strFolder As String, strFileName As String"Scripting.FileSystemObject"strFolderlngCountlngCountlngCountlngCount) = strFolder & "\" lngCount = lngCount + 1 End If Next For Each objFolder In objFSO.GetFolder.Subfolders SearchFiles strFolder & "\" & objFolder.Name, strFileName Next End Sub Public Sub Make_Link(1"B" &.Rows.CountxlUplngRow, 2lngRow, 1lngRow, 2) If strTMP = "" Or Left = ":" Then Exit Sub SearchFiles strTMP, "*.*" 'adapt If lngCount = 0 Then MsgBox "No file found" Exit Sub End If With ThisWorkbook.Worksheets.Cells.Clear.Range1, 2lngCount, 2)strList.Cells, CellsstrDir.Cells, CellsstrDat"A:B""Shell.Application"0, "Folder", &H10, 17strFolder As String, strFileName As String"Scripting.FileSystemObject"strFolderlngCountlngCountlngCountlngCountlngCount) = strFolder & "\" strDat = objFile.Datelastmodified lngCount = lngCount + 1 End If Next For Each objFolder In objFSO.GetFolder.Subfolders SearchFiles strFolder & "\" & objFolder.Name, strFileName Next End Sub Public Sub Make_Link(1"B" &.Rows.CountxlUplngRow, 2lngRow, 1lngRow, 2*3 ist leider nicht möglich

Ja aber das modifizieren war nicht so tragisch. Hab ja nur 2 Zeilen eingefügt bzw 2 mal kopiert und 3 Worte und 2 Zahlen geändert.

WOW, du hast sogar die gleiche variable wie ich benutzt . Im Grunde ist es einläuchtend, was du gemacht hast und ich habe genau das gleich versucht und zwar ca. 1,5 Stunden am Stück, warum das jetzt auf einmal läuft und vorher nicht ist mir ein Rätsel, den Goldenen Stern hast du dir verdient

ich hätte das DH mehrfach vergeben. aber schau Dir trotzdem die beiden Links an, probiere die integrierte Eigenschaft mit Nummer auch mit anderen Nummern aus oder such sonst im Netz was dazu.

Ich weiß nicht wie ich dazu gekommen bin das jetzt auf englisch zu schreiben, also hier nochmal in deutsch:
Das makro gibt quelle und dateiname eines ausgewählten ordners und seiner unterordner aus. ich brauch in zeile C noch das passende Änderungsdatum. Der Befehl dürfte lauten: DateLastModified

Da ich lange nichts mehr mit VBA gemacht habe und da nur in Word, kann ich dir da leider nicht weiterhelfen, aber ich verweise dich da gerne auf das Forum von Microsoft.
Die Newsgroups wurden wie es ausschaut leider geschlossen.
Als ich Probleme hatte wurde mir in den Newsgroups schnell und kompetent weitergeholfen.
Ein Link zum Einstieg ins Forum: Microsoft Community

i've found sth similar in :
Re: Wie kann ich das Speicherdatum in eine Tabellenzeile einfügen?
unexpectedly this µ has worked once but I couldn't reproduce. Even copying and saving in a general module under another name didn't work: The altered title of the µ didn't shine up in the list and starting it via the green triangel didn't work. .
But perhapps you will find qualified help there

machst du dich über mein Englisch lustig? o.o

lustig macht er sich nicht, aber perfekt ist es auch nicht.

Wenn ich mir die Testversion runterlade, wo geregelt ist das es nach 60 Tagen abläuft muss ich das dann iwie abmelden oder bin ich dann trotzdem kaufpflichtig? Oder kann ichs danach einfach deinstallieren ohne Probleme?
Wenn nein, könnt ihr mir bitte ieine Seite sagen wo man power point ohne den Product Key runterladen kann? -.-

Die Testversion laeuft nach 60 Tagen automatisch ab. Du kannst aber kurz vor Ablauf das Programm ospprearm.exe mit Admin-Rechten ausfuehren, dann wird der Testzeitraum zurueck gesetzt, und die 60 Tage fangen von vorn an.

Es ist eine Testversion. Du MUSST dir das Programm nach ablaufen der Zeit NICHT kaufen, wenn du es aber deinstallierst und wieder installierst wird das die Probezeit nicht verlängern oder zurücksetzen. Generelles deinstallieren wird aber kein Problem sein.

Hallo. Ich bin 17 und kenne jemanden der ist 18. Wir haben vor längerer Zeit mal geschrieben und er wollte sich auch treffen aber er hat zu der Zeit eine Affäre gesucht. Ich will/wollte das nicht und habe deshalb den Kontakt abgebrochen. Vor 1 Monat haben wir wieder angefangen zu schreiben. Er ist eigentlich wirklich süß und ich habe ihm von Anfang an gesagt dass ich nach wie vor nicht an etwas körperlichem interessiert bin. Das war auch okay für ihn und er meinte er ist mit ner Weile auch an etwas Ernstem interessiert und wollte das damals nicht weil er bald etwas weiter weg studieren geht. Dann wir haben so über sexuelles geredet und er meinte er würde gerne mal "mehr machen". Und da habe ich ihn wieder drauf hingewiesen, dass ich nichts körperliches will und er meinte er will wirklich was Ernstes aber schon auch mit Körperkontakt in der Beziehung. Wir wollen uns bald treffen. Haben wir noch nicht und ich wäre von einer Beziehung auch nicht abgeneigt und körperliches gehört auch dazu. Da haben wir auch überall schon drüber gesprochen und ich meinte auch dass wenn wir wirklich zusammen kommen sollten er mir Zeit geben muss und ich nicht direkt mit ihm schlafe usw. Und er meinte auch dass das kein Problem ist. Aber er hat auch schon einmal gefragt wie viele Treffen ich bräuchte bis ich jemandem einen blase. Da hab ich ihm auch gesagt dass ich die Frage sehr unangebracht finde und er hat sich entschuldigt. Insgesamt glaube ich ihm eigentlich schon dass er was Ernstes will aber ich hab dann etwas schiss dass er mich zu sehr unter Druck setzt. Andererseits sind Jungs in diesem Alter halt auch darauf aus und es ist ihnen halt wichtig und mit 17&18 auch durchaus normal finde ich. Nur macht er manchmal so perverse Andeutungen dass er mich geil findet oder so und das finde ich komisch. Ist das normal? Wir reden aber auch über ganz normale Sachen also persönliches und so. Es geht nicht nur um das Thema MEINE FRAGE: Was denkt ihr? Will er nur was Körperliches? Oder glaubt ihr dass da eine wirkliche Beziehung draus werden kann? FÜRS LESEN Wenn noch Fragen bestehen beantworte ich sie gerne.
Das habe ich letztens gefragt. Auf eine Antwort hin habe ich ihm einfach genau das geschrieben und er hat mit geschworen dass er es Ernst meint aber jetzt ist er zurückhaltender weil er es schade findet dass ich sowas von ihm denke. Was denkt ihr? Was soll ich tun?

Bitte sei mir nicht böse, aber ich habe ein bisschen das Gefühl du bist blind. 
Ihr habt euch noch nie getroffen oder kennt euch noch nicht persönlich, oder?
Ich finde, dass er es nicht ernst meint bzw nur so lange darauf wartet, bis er mit dir geschlafen hat und ist dann wieder weg.
Wenn er es wirklich ernst meinen würde, dann hättet ihr euch schon viel früher getroffen und er hätte darauf bestanden. Ansonsten meint er es nicht wirklich ernst.

Jungs in dem Alter müssen nicht so sein. Wie sie untereinander reden, ist etwas anderes, aber Mädchen gegenüber gehört sich so etwas nicht. Vielleicht ist er doch noch etwas unreif für eine feste Beziehung. Das wäre in dem Alter durchaus in Ordnung. Belasse es doch erstmal bei einer netten Bekanntschaft, aus der ggf. mehr werden kann. Dann merkst Du schnell, wie ernst es ihm ist.

Zu aller Erst mach dir keine Gedanken. Lass dich nicht von ihm unter Druck setzen. Für mich sieht es so aus als hätte er evtl schon irgendwo Interesse an dir beziehungstechnisch aber trotzdem steht für ihn das Körperliche sehr im Vordergrund. Du musst dir kein schlechtes Gewissen machen nur weil du antwortest was du denkst! Wenn man sich wirklich liebt dann kommt sowas von ganz alleine glaub mir. Aber trotzdem kommt es für mich so rüber als wäre er nur sexuell an dir interessiert. Es liegt an dir was du machst, ich will dir auch nicht sagen was du machen sollst. Du kannst dich gerne mit ihm treffen aber sobald er dir deutlich zeigt dass er nur auf eins hinaus will dann unterbinde das auf jeden fall wenn du nicht willst. Du musst dich zu nichts zwingen lassen

Lol. Männer. Spätestens jetzt solltest du erkennen, dass er nur "das eine" will. Ist aber auch nichts Ungewöhnliches. Nur bei manchen "Männern" merkt man es schneller, bei manchen langsamer. Wenn du eher etwas ernstes willst dann lass dich nicht ausnutzen. Wenn du ihn liebst und du dich auf ihn einlässt ist die Chance verletzt zu werden ziemlich hoch. Also würde ich mich entweder für Spaß entscheiden. oder dafür, dass du deine wertvolle Jungfräulichkeit noch eine Weile behältst.

Also ich muss bei Visual Basic bei Excel einen Code für die Berechnung der Schnittpunkte zweier quadratischer Funktionen schreiben. Und beim durchgehen zeigt es mir a, b, und c als Laufzeitfehler 13 an. Kann mir jemand helfen. Hier der Code Private Sub CommandButton12_Click If d > 0 Then x1 = -t + Sqr / 2 * a x2 = -t - Sqr / 2 * a y1 = a1 * x1 * x1 + b1 * x1 + c1 y2 = a1 * x2 * x2 + b1 * x2 + c1 dummy = MsgBox("Die Funktionen haben zwei Schnittpunkte und zwar bei" & vbCr & "(" & x1 & "|" & y1 & ")" & vbCr & "und bei " & vbCr & "(" & x2 & "|" & y2 & ")""Die Funktionen haben einen Schnittpunkte und zwar bei" & vbCr & "(" & x3 & "|" & y3 & ")""Die Funktionen schneiden sich nicht.""Die Funktionen haben unendlich Schnittpunkte.") End If End Sub

Ich habe Deine Code erstmal in eine lesbare Form gebracht:
Private Sub CommandButton12_Click()
a1 = Cells
a2 = Cells.Address
b1 = Cells
b2 = Cells
c1 = Cells
c2 = Cells
a = Cells - Cells
b = Cells - Cells
c = Cells - Cells
If Gesamta > 0 Then
d = b * b - 4 * a *
If d > 0 Then
x1 = -t + Sqr / 2 * a
x2 = -t - Sqr / 2 * a
y1 = a1 * x1 * x1 + b1 * x1 + c1
y2 = a1 * x2 * x2 + b1 * x2 + c1
dummy = MsgBox("Die Funktionen haben zwei Schnittpunkte und zwar bei" _
& vbCr & "(" & x1 & "|" & y1 & ")" & vbCr & _
"und bei " & vbCr & "(" & x2 & "|" & y2 & ")")
ElseIf d = 0 Then
x3 = -b / 2 * a
y3 = a * x3 ^ 2 + b * x3 + c
dummy = MsgBox("Die Funktionen haben einen Schnittpunkte und zwar bei" _
& vbCr & "(" & x3 & "|" & y3 & ")")
Else
dummy = MsgBox("Die Funktionen schneiden sich nicht.")
End If
End If
If a = 0 And b = 0 And c = 0 Then
dummy = MsgBox("Die Funktionen haben unendlich Schnittpunkte.")
End If
End Sub
Wenn du einen Fehlercode angibst ist es auch immer sinnvoll, die Beschreibung dazu mit zu posten ("Typen unverträglich")!
Dann hätte ich Dir nämlich sofort sagen können, dass wohl in Deinen Zellen Text steht, und keine echten Zahlen, und Text kann nicht voneinander abgezogen werden.
Ein Tipp:
Du solltest als erste Zeile immer:
Option Explicit
stehen haben, dann bist Du gezwungen Deine Variablen auch zuerst zu deklarieren, und das sollte man IMMER machen.
Du hättest Deinen Code also begonnen mit:
Dim a1 as Double
Dim a2 as Double
usw.
DANN hättest Du die Fehlermeldung schon bei:
a1 = Cells
bekommen, und wärst vlt. eher hinter den Fehler gekommen.
Noch zwei Fehler in Deinem Code, die mir aufgefallen sind:
Warum nicht:
a = a1 - b1
Schließlich hast Du die Werte aus den Zellen schon diesen Variablen zugewiesen!
und:
If Gesamta > 0 Then. End If
Da Du der Variablen "Gesamta" keinen Wert zugewiesen hast, wird der komplette Code danach wohl NIE ausgeführt werden!
Auch t und y tauchen nirgendwo auf.
Falls Du diese Variablen schon woanders zugewiesen hast, solltest Du das in Deiner Beschreibung erwähnen.
SO lässt er sich schlecht nachvollziehen/ testen.
Am besten wäre es, wenn Du eine Beispieldatei bei einem Upload-Service (z.B. File-Upload.net - Ihr kostenloser File Hoster!) hochladen könntest

P.S.:
Ich habe noch eine Fehler entdeckt, durch Zufall, der wohl eher sachlich als programmiertechnisch ist:
Und zwar habe ich in alle Zellen eine 2 eingegeben ("klappt" aber wohl immer, wenn in allen Zellen die gleichen Zahlen stehen) und bekomme sowohl die Msg:
Die Funktionen haben einen Schnittpunkte und zwar bei
als auch anschließend:
Die Funktionen schneiden sich nicht.

allen für eure Mühe und Antworten aber ich habe es 5 Minuten später selbst herausbekommen und zwar habe ich für die Zellen falsche Angaben gemacht. Das mit dem Gesamta habe isch dank euch behoben. Nochmal.

☼
Und es wäre nett von Dir gewesen, wenn Du auch schon 5 Minuten später hier Bescheid gesagt hättest, dass das Problem gelöst ist.

Code:Private Sub CommandButton12_Click If d > 0 Then x1 = -t + Sqr / 2 * a x2 = -t - Sqr / 2 * a y1 = a1 * x1 * x1 + b1 * x1 + c1 y2 = a1 * x2 * x2 + b1 * x2 + c1 MsgBox "Die Funktionen haben zwei Schnittpunkte und zwar bei" & vbCr & _ "(" & x1 & "|" & y1 & ")" & vbCr & _ "und bei " & vbCr & "(" & x2 & "|" & y2 & ")" ElseIf d = 0 Then x3 = -b / 2 * a y3 = a * x3 ^ 2 + b * x3 + c MsgBox "Die Funktionen haben einen Schnittpunkte und zwar bei" & vbCr & "(" & x3 & "|" & y3 & ")" Else MsgBox "Die Funktionen schneiden sich nicht." End If End If If a = 0 And b = 0 And c = 0 Then MsgBox "Die Funktionen haben unendlich Schnittpunkte." End If End Sub

Welche Datentypen sind die Variablen?

Warum hast du die Messagebox-Antworten in eine Dummy-Variable gespeichert?

Laufzeitfehler 13 deutet auf einen Konvertierungsfehler hin. Stehen in Cells, Cells, Cells, Cells, Cells oder Cells evtl nicht Zahlen?