Also meistens ist ja nur das Glas kaputt. Damit gehst du zu einem Handyreparaturservice. (Meist kleine ausländische Läden, die auch zig andere gebrauchte Handys, Schalen und Telefonkarten ins Ausland verkaufen) Das letzte mal als ich da war hat jemand ein Iphone Glas für 40 Euro reparieren lassen. Wenn sonst nix ist, würde ich es machen. Besonders da du nur das 3g hast. (Gebraucht wert ca 170 Euro) Das Iphone 4 mit gebrochnem Glas hat noch einen Gebrauchswert von ca. 300 Euro.

...zur Antwort

Du musst ein VBA Programm schreiben. Kannst ja auch aufnehmen. start Jedes Textfeld anklicken Wert kopieren und in einen Neuen Arbeitsblatt einfügen. stop Danach solltest du ein Makro haben was dir deine Sache machst. Anschließend kannst du das Makro auf ein Button legen.

Umgekehrt kannst du das natürlich auch machen. Von Excel kopieren und in Formuar einfügen. Das Makro kannst du dann unter ein Refresh Butten legen.

...zur Antwort

du erwartest doch wohl nicht ernsthaft hier eine Beschreibung wie man ein Verbrechen verübt.

Mein Tipp ist geh zu Ihm rüber und frag nach dem Schlüssel,* weil dein Internetprovider Schwierigkeiten macht. ;-) * Gib Ihn von mir aus auch 5 Euro. Danach hast du es bis er es mal ändert und das tun die meisten nie.

...zur Antwort

Also am einfachsten ist das so:

Du sagst Makro aufnehmen. Dann gehst du in Zelle A2 und kopierst die Formel heraus. Und fügst Sie (wichtig) in die Eingabeleiste oben ein. Dann gehst du zu B2 und machst das selbe. usw

zum Schluss würst du ein Makro haben das die Befehle in ähnlicher Form enthält: Range("A2").FormulaR1C1 = _ "=VALUE((MID(Export!R20C4,FIND(""TAN"",Export!R20C4)+4,6)))"

...zur Antwort

Also wie du das unter Word machst kann ich dir nicht genau sagen. Aber vielleicht hilft dir ja auch das Access Vba weiter.

In Access benutze ich die Controlls um die einzelnen Elemente anzusprechen.

'21.01.2011

'Function gibt die Objektnamen eines Formulars "|" getrennt zurück Function getFormFields(formularname As String) As String

Dim Ctl As Control, strRueckgabe As String
strRueckgabe = ""

DoCmd.OpenForm formularname
 For Each Ctl In Forms(formularname)
    On Error Resume Next
        strRueckgabe = strRueckgabe & Ctl.name & "|"
    Next Ctl

getFormFields = Nz(strRueckgabe, "")
DoCmd.Close acForm, formularname

End Function

...zur Antwort

Heißt das nicht DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, Kunde, "e:\hfh\Kunde.csv", True für Exceldokumente (csv ist ein durch ; getrenntes Exceldokument)

Alternativ kannst du auch CopyFromRecordset benutzen.

Dim objExcel As Object Set objExcel = CreateObject("Excel.Application") Dim rst As DAO.Recordset Set rst = CurrentDb.OpenRecordset(Strsql, dbOpenDynaset) objExcel .Range("A4").CopyFromRecordset rst objExcel .Visible = True

...zur Antwort

Ganz genau verstehe ich das nicht.

Du willst auf die Daten einer anderen Datenbank zugreifen, oder auf eine andere Tabelle? Du kannst einfach den RecordSource ändern. Indem du auf eine andere Tabelle zugreifst. Und du kannst Tabellen von fremden Datenbank verknüpfen.

Oder brauchst du in der zweiten Datenbank das selbe Formular? In diesen Fall öffne beide Datenbanken und schiebe das Formular rüber.

Aber 2 Stunden ist auch nicht lang. Bis du im Internet auf 'ne Lösung gestoßen bist, vergehen oft noch mehr Zeit.

...zur Antwort

Eine andere Möglichkeit könnte sein, dass du eine entfernte Tabelle (z.B. von einem SQL Server) ohne primary Spalte benutzt. Da ist bei mir auch kein Schreiben möglich.

...zur Antwort

Du musst die Datengrundlage ändern. Baue einen Select in dem die Nr nicht mehr enthalten ist. Nach dem Motto

Select id .. from... where id not in (select id...)

...zur Antwort

Also mit Access ins Web solltest du vergessen. Dafür ist Access nicht ausgelegt. Was du machen kannst ist die Daten zu exportieren und auf dem Webserver vorhandene Datenbank (meißt MySQL) zu importieren. Allerdings musst du alle Formular neu selber z.B. in PHP bauen. Um die Sicherheit der Daten musst du dich dann allerdings auch noch kümmern. Zugriffe, Verschlüsslung der Daten und verteilte Systeme sind nicht zu unterschätzen.

...zur Antwort

Wenn du den Wert hast kannst du ihn doch ganz einfach in eine Variable Speichern.

Dim eur_usd as double;

eur_usd = Range("a1") 'oder hier den Wert aus dem Internet

IfdblEURBetrag = varUSD / eur_usd

...zur Antwort

Cracks sind immer so eine Sache, man braucht für jede Version einen eigenen Crack. Und nach einen Upate kann es sein, dass er nicht mehr funktioniert.

Es gibt noch eine andere Möglichkeit. Du könntest eine genaue Kopie deiner CD als Image erstellen und im virtuellen Laufwerk liegen lassen. Programme die das machen sind z.B. Alkohol 120% oder deamon tools. Zu Alkohol 120% hab ich auch was gelesen:>

Gratis-Vollversion: Alcohol 120% v5.0 Blu-ray

Welche Eigenschaft zeichnet hochprozentigen Alkohol aus? Klar: Er brennt. Genau das ist auch die Stärke von Alcohol 120%. Die Software brennt 1:1-Abbilder von CDs, DVDs und Blu-ray-Discs. Über Pfingsten bekommen Sie von CHIP Online einen vollen Schluck aus der Download-Flasche in Form der Vollversion von Alcohol 120%>

...zur Antwort

Access: Neue Datenbank; Neue Tabelle; Werte einfügen; Formularassistenen Einen Wert Suchen!

Aber wenn du nur diese eine Tabelle hast kannst du auch Excel benutzen mit Filterung und SVerweis.

...zur Antwort

Wenn es in VBA sein sollte könntest du auch so programmieren:

Gehe jede Zeile durch (Schleife über alle Zeilen)

Gehe jede Zeile von Rechts durch (Schleife Vom Ende der Zeile bis zum Anfang) ['Hier wird die letzte spalte der Zeile 4 ermittelt letztespalte = Sheets(1).Cells(4, 256).End(xlToLeft).Column]

Sobald du auf ein X stößt färbst du den Rest der inneren Schleife rot.

Das dürfte funktionieren. Wenn du noch mehr Anleitung brauchst frag ruhig.

...zur Antwort

Hey du kannst ein neues Task objekt öffnen und dort dein Befehl reinschreiben.

Hier zum Beispiel öffne ich ein einfaches xml mit Hilfe der Shell in Notepad.

' Public Sub Test2200() ' Const DATEI = "D:\ftp\config.xml" ' Dim TaskId As Double ' TaskId = Shell("notepad.exe " & DATEI, vbNormalFocus) ' If TaskId = 0 Then MsgBox "Konnte notepad nicht starten" ' End Sub

...zur Antwort

Wie soll denn das Übertragen den angestoßen werden? Durch drücken eines Buttons?

Dann kannst du doch einfach programmieren. Schreibe es in die nächste leere Zeile.

Das einfachste ist, du lässt eine Globale Variable oder einen Zähler in einem unsichtbaren Excelfeld mitzählen.

...zur Antwort

In der Abfrage

schreibst du wo [anreisedatum] = date()

...zur Antwort

Ich würde ein neues Formular basteln wo du dein Name abfragen kannst.

Dies kannst du mit Docmd.OpenForm "Formularname",,,,,acDialog

aufrufen. Dann hält der Code solang an bis das Fenster geschlossen wird.

Den Namen kannst du dir speichern entweder in einer globalen Variable, in einer Tabelle, oder in einem unsichbaren Feld in deinem Hauptformular.

Dein Bericht kannst du entweder so aufrufen:

DoCmd.OpenReport "Reportname", , , "name=" & Me.unsichbaresFeld.Value

Oder du definierst gleich deine Abfrage neu.

Eine Abfrage bezogen auf die Tabelle wo du den Wert reingeschrieben hast löst auch deine Probleme.

...zur Antwort

Hallo Julia99,

Sims 2 brauch immer das letzte richtige Ad-On Apartmentleben ist das letzte, leider. Es bleibt dir nicht anderes übrig als dir appartmentleben gebraucht zu kaufen, oder dich auf seiten wie megagames.com nach einen nocd crack umzuschauen. Was natürlich nicht erlaubt ist. Besonderst wenn du das spiel noch nicht mal hast.

...zur Antwort