Glenn Medeiros Not Me / RR:Suche

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.

Hallo, ich habe seid ungefähr drei tagen probleme beim atmen , es ist ein bedrückendes gefühl im hals/brust bereich. manchmal fühlt es sich auch so an als ob etwas im weg ist wodurch ich weniger Sauerstoff bekomme wie gewöhnlich. wenn ich sport mache oder z.B einfach nur etwas länger gehe bemerke ich das es schwieriger wird zu atmen. Außerdem kann ich nicht lange ein-aus atmen dann stoppt es so zu sagen und tut etwas weg. Dazu habe ich zwischendurch noch leichten trocken husten und etwas halsschmerzen. hat jemand eine idee was dies sein könnte? könnte es auf Asthma oder eine Lungenentzündung hinauslaufen? über antworten freuen! keine sorge ich habe dienstag einen arzt Termin trotzdem wüsst ich gern ob jemand eine idee hat wie ich es vill auch so wieder weg bekomme falls es nichts akutes ist.

Lass mich raten - du willst tief einatmen, aber als ob da ne Blockade ist, richtig? Es geht einfach nicht mehr so viel Luft rein wie man es gewohnt ist?
Krebs - kann man mit großer Wahrscheinlichkeit ausschließen.
Der trockene Husten und die Kurzatmigkeit deuten eher auf ne Bronchitis hin. Bei ner Lungenentzündung würde noch Fieber hinzukommen. Bei der a-symptomanischen Lungenentzündung bleibt zwar das Fieber weg, aber auch der Husten.

Hallo, irgendwie kann ich mir das nicht so richtig vorstellen. weil wenn einer z.B. einfach zu viel getrunken haben sind sie ja selbst schuld. Gut, das war nicht das Beste Beispiel, aber mal angenommen jemandem passiert etwas wirklich aus purer Dummheit oder ist Magersüchtig oder so und es passiert etwas.
Fühlt man da bei jedem gleich viel mit? Oder ist es manchmal wirklich eher nur Job?
, Vadfingel

Es gibt im Rettungsdienst den Spruch "Du kannst nicht jeden Tod mit sterben".
Im Einsatz ist es erst mal notwendig professionell die Aufgaben zu erfüllen die dem Patient am meisten helfen. Da ist eine gewisse Distanz gefragt. RD´ler oder Notärzte sind aber genau so Mensch wie du und ich, mit Empfindungen die uns als Menschen auszeichnen und sie haben auch Familien zuhause.
Ich habe viele gute Freunde im Rettungsdienst, keinen davon würde ich als gefühllos bezeichnen. Im Gegenteil, weil ich auch merke das sie es brauchen über bestimmt Einsätze zu reden.
Aber wenn sie die Nacht um 3 als Liegendtaxi missbraucht werden oder der bekannte Patient die Wochen zum 4. mal die Birne zugezogen hat dann braucht man auch nicht wirklich noch Mitgefühl erwarten. Und wer ehrlich zu sich selbst ist weiß auch, das wenn er mal einen schlechten Tag hat, auch mal das Ekel vom Dienst sein kann.

Wer einen solchen Beruf ausübt, muss eine gewisse Distanz zum Patienten machen- zuviel Emotion blockieren die Arbeit und es kommt darauf, dass die Sanis wissen, wie sie einem Besoffenen das Leben retten und nicht, ob sie das jetzt toll finden oder nicht.
Und Menschen, die sich dafür einsetzen, das Leben anderer zu schützen, haben mit Sicherheit nicht besonders viel Verständnis für diejenigen, die Leib und Leben aus purem Leichtsinn oder Dummheit aufs Spiel setzen.

Bei einem Einsatz hab ich vorallem mit den Angehörigen mitgefühlt, die das mit ansehen mussten. In gewissem Maße berühren einen die Geschichten schon.aber für das Personal persönlich kommen diese Einsätze in einer solchen Stückzahl vor, dass man sich - banal gesagt - ein wenig daran gewöhnt, und daher auch nicht mehr so an sich ranlässt.zum Glück muss man sagen.

Nein, ein arzt hat mir bei meinem fußballunfall schön an den kopf geworfen das ich selber schuld sei. Also kein mitgefül trotz der schmerzen

Ich denke mit der Zeit stumpft man da ab und vieles läuft nur Routinemäßig ab. aber manche Situationen gehen ihnen bestimmt auch nah

Sie sind auch nur Menschen Ich habe gute erfahrungen mit Notärzten gehabt, hatte da mal nen blöden Unfall Mit der HolzAxt ins Bein

In dem Lied erzählt das lyrische Ich von einem Sänger, der genau von seinem Leben gesungen hat, obwohl er es nicht kannte: "I felt he found my letters and read each one out". Es fühlt sich beschämt, weil sein Leben vor allen offenbart wird. Daher auch der Name "Killing me softly".

ka, aber das is so ungefähr der deutsche text

Er klimpert meine schmerzen mit seinen Fingern,
er sang mein Leben in seinen Worten.
Er bringt mich zärtlich mit diesem Lied um
Er erzählt mein ganzes Leben in seinen Worten,
er bringt mich mit diesem Lied zärtlich um.

Ich hörte, er würde ein gutes Lied singen, ich hörte, er hätte Stil.
Und deshalb ging ich hin um ihn zu sehen und um eine Weile zuzuhören.
Und da war er, der junge Mann, ein Fremder in meinen Augen.

Ich fühlte dass ich errötete, verlegen wegen der Menge.
Ich fühlte dass er meine Briefe gefunden
und jeden einzelnen laut vorgelesen hatte.
Ich betete, dass er aufhören würde, aber er machte gerade so weiter.

Er sang als kenne er mich in aller meiner dunklen Verzweiflung.
Und dann schaute er richtig durch mich hindurch als wäre ich gar nicht da.
Aber er sang immer weiter, sang klar und stark.

Eine Frau kommt in eine Bar, um einem Sänger lauschen, der gut sein sollte. Während sie ihm zuhörte, schaute er durch sie hindurch, als wäre sie nicht da, doch als er sang erzählte er ihr Leben mit seinen Worten.

Bitte Das Lied beschreibt einfach den Spruch: "Ich könnte grad sterben" und alle Emotionen, die mit einer solchen Aussage verbunden sind.

Das habe ich zufällig heute gelesen:
Im Sommer 1972 beobachtet die amerikanische Sängerin Lori Lieberman in Los Angeles fasziniert den Auftritt von Don McLean in einem Nachtclub. Sie schildert ihre Gefühle beim Anhören von "American Pie" zwei Freunden, die setzen das ganze in einen Song um, den Lori dann auf ihrem Debutalbum veröffentlicht: "Killing Me Softly With His Song".

Es war wirklich reiner Zufall. Mir war mittags mal wieder "American Pie" durch den Kopf gegangen, es stammt aus meiner Sturm-und-Drang-Zeit. Deshalb habe ich bei Google recherchiert, weil ich eigentlich mal wissen wollte, wie viele verschiedene Lieder Don McLean in dem Lied zitiert (z.B. Jumpin' Jack Flash). Dabei bin ich dann auf die Information gestoßen, die dich interessiert hat.



Luigi

Das Lied kenne ich nicht, aber der Titel ist auf jeden Fall schon mal ein Wortspiel:

"to hold something against somebody" heißt im Deutschen "jemandem etwas vorhalten" oder "jemandem etwas übel nehmen".

Aber die Amis können diese Worte natürlich auch so wörtlich verstehen, also etwas "gegen jemanden halten", also an jemanden heranhalten.

"If I said you have a beautiful body, would you hold it against me?" heißt dann also gleichzeitig:
"Wenn ich sagte, Du hast einen schönen Körper, würdest Du mir das übel nehmen?" aber auch
"Wenn ich sagte, Du hast einen schönen Körper, würdest Du ihn an mich drücken?"

Kleines Wortspiel und war mal ein guter Anmachspruch drüben, bevor er in aller Munde war

Ich hoffe, ich konnte ein bißchen helfen.

soll ich ne übersetzung vom text schreiben?

Dafür möchte ich aber ein par pünktchen

hier:


If I said you had a beautiful body
wenn ich sagen würde, du hättest einen schönen körper

would you hold it against me
würdest du ihn an mich lehnen

If I swore you were an angel
würde ich schwören, du seist ein engel

would you treat me like the devil tonight
würdest du mich dann heute nacht wie einen teufel behandeln?

If I were dying of thirst
wenn ich am verdursten wäre

would you flow in love come quince me
würdest du meinen durst mit deiner liebe stillen?

If I said you had a beautiful body
würde ich sagen du hättest einen schönen körper

would you hold it against me
würdest du ihn an mich lehnen?

Verse 1
---

Now we could talk all night about the weather
wir könnten die ganze nacht über das wetter reden

I could tell you about my friends out on the coast
ich könnte dir von meinen freunden von der küste erzählen

I could ask a lot of crazy questions
ich könnte dir viele, verrückte fragen stellen

Or ask you what I really want to know.
oder dich fragen was ich wirklich wissen will

--
Chorus
--

Verse 2
---
Now rain can fall so soft against the window
der regen kann so sanft gegen das fenster fallen

The sun can shine so bright up in the sky
die sonne kann so hell am himmel scheinen

But Daddy always said don't make small talk
aber vater sagte immer, führe keinen small talk

He said come on out and say what's on your mind
er sagte, komm schon und sag was du denkst

Es heißt "hold it against".
Es läuft darauf hinaus, dass der 'Sprecher' Bedenken hat, seiner Liebsten zu sagen, sie habe einen wunderschönen Körper, weil man dann daraus schließen könnte, er sei oberflächlich.

In dem Lied geht es darum, dass der sänger sich nicht sicher ist ob er seiner liebsten sagen sollte wie sehr er ihren Körper liebt, da sie das als oberflächlich auffassen könnte.