wurbo

hi Leute, neuer Tag-neues Problem. gibt es in access-vba sowas wie "application.GetOpenFilename(...), wie es in excel funktioniert?? oder wie kann ich dem Nutzer sonst eine kömfortable Möglichkeit bieten, sich eine Datei zum öffnen auszusuchen??

vielen Dank für die Hilfe, hab die typumwandlung direkt im sql-statement gemacht mit "select clng(tabelle1.feld1) from..., geht supi bis zum nächsten Problen(in wenigen Minuten... )

muss ich mit vba machen, sonst geht der import nicht. hast du es so gemeint? DoCmd.RunSQL " alter table rohdaten column f1 zahl(integer)" funktioniert irgendwie nicht, sagt immer "fehler in alter table anweisung" was mache ich falsch????

Guten Morgen alle zusammen. Auch heute benötige ich wieder erfahrene Hilfe. Ich importiere aus Excel einen Datenbestand in eine Access97-DB. Dabei kommen die Rohdaten erstmal alle in eine Tabelle, von der aus werden sie per anfügeabfragen auf andere Tabellen verteilt. eine Spalte dieser rohdatentabelle hat ist vom Datentyp text , ich brauche sie aber zwingend als longint, weil die daten darin Primärschlüssel einer anderen tabelle werden sollen. Wie kann ich nun per vba den Datentyp dieser Spalte in der tabelle ändern??

ich ich ich --- Mailadresse im Profil

da fragt er nach Parametern, Ich habe eine andere Variante gefunden, die funzt (ich bin soo glücklich). für alle, die es noch interessiert: INSERT INTO company ( compname ) SELECT DISTINCT April2002.[9] FROM April2002 LEFT JOIN company ON April2002.[9] = company.compname WHERE (((company.compname) Is Null)); Trotzdem DANKE AN ALLE HELFER

nun-ich will eine Datenbank erstellen, und für diese gibt es aus einem anderen system immer wieder aktualisierungen, jetzt will ich diese Daten zu den bestehenden hinzufügen, aber nur wenn der entsprechende begriff (z.B. ein Firmenname) noch nicht vorhanden ist. so steht z.B. Fleischerei Lehmann schon in der Datenbank, ist aber bei den aktualisierungen auch dabei-soll demzufolge nicht angefügt werden. der nächste Datensatz ist Metzger Meier-gibt es noch nmicht-also anfügen. Jetzt kommt vielleicht wieder Fleischerei Lehmann-also überspringen. Es ist wichtig, dass die Primärschlüssel nicht verändert werden. ich hoffe, ich konnte erklären was ich will

Hi, Ich möchte eine Anfügeabfrage erstellen, die Daten an eine bestehende Tabelle anfügt (was auch sonst). Dabei möchte ich aber nur die Daten anfügen, die es in der bestehenden Tabelle noch nicht gibt. Ich weiss nicht wie ich das bewerkstelligen soll---hilfe!!!!!!!!!!

hätte mich schon interessiert, warum es nicht ging, oder ging es etwa doch noch?

na dann eben nich

ist es möglich mir mal so ein blatt su schicken? es muss gehen. Die Sache mit dem Haltepunkt mal probiert?

wenn du nichts professionelles findest- ich hab mal sowas als access-datenbak geschrieben, könnte ich dir zur Verfügung stellen, so als Basis für Eigenentwicklumng oder so, wenn Du Interesse hast, melde Dich einfach nochmal

genau-das meine ich auch

digital video (dv) liefert über FireWire 3,5 MByte / sekunde Videodaten, ich hab ne 7200 IBM 60GB und garkeine Probleme

wenn man es sehen könnte, das blatt, probleme könnte es mit zweistelligen zahlen in der tabelle geben, da nach der jetzigen vatiante nämlich 1 und 23 dasselbe ist wie 12 und 3, müsste man noch komata einfügen, aber erst mal sehen...

hast du es mal mit dem haltepunkt versucht? oder kannst du mir mal se eine tabelle schicken (wenn es kein Betriebsgeheimnis ist?) eigentlich muß mein code funktionieren!

ein tip- www.atnotes.de

setze doch mal einen haltepunkt auf die Zeile "if kombination..." und lasse das Makro schrittweise durchlaufen, dan kannst du ja am Haltepunkt die variableninhalte prüfen und siehst woran es scheitert

lies mal in der vba-hilfe unter addPicture Methode, müsste ungefähr passen

versuche es mal mit folgendem code: Sub freaka() Dim zusuchen, kombination As String zusuchen = InputBox("Wonach suchen?") For i = 4 To 59 Cells(i, 3).Activate kombination = ActiveCell.Value & ActiveCell.Offset(0, 1).Value & ActiveCell.Offset(0, 2).Value & ActiveCell.Offset(0, 3).Value & ActiveCell.Offset(0, 4).Value & ActiveCell.Offset(0, 5).Value & ActiveCell.Offset(0, 6).Value If kombination = zusuchen Then MsgBox "gefunden in zeile " & i End If Next End Sub bitte beachte, dass der code von kombination =... bis einschließlich activecell.offset(0,6).value in eine Zeile muss. das ist für eine tabelle, wie man den B´vba-code als makr eigibt und startet, weisst du sicherlich , wenn nicht, melde dich einfach nochmal

achso-nach einer kombination aus 7 zahlen soll gesucht werden (wenn z.B. 2348567 gesucht wird soll die zeile gefunden werden wo in spalte c=2 und d=3 und e=4 und f=8 und g=5 und h=6 und i= 7 steht)? hab ich das jetzt richtig verstanden? dann muss es nämlich anders werden, ohne cells.find . sag mal, ob ichs richtig verstanden habe.

ich hoffe du kennst dich ein wenig mit vba aus, wenn nicht, schreib ich dir dannmal was, wenn ich etwas mehr zeit habe. Jedenfalls-zum suchen gibt es: Cells.Find(What:=neuer, After:=ActiveCell, LookIn:=xlValues, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False).Activate wobei nach "What:=" dann die Zahl stehen sollte, die du suchst. Wäre dann sicher günstig, wenn du die zu suchende Zahl über ne InputBox abfragst, wegen komfort und so. Wie gesagt, nach dem Mittag hab ich etwas mehr zeit, melde dich nochmal wenn du garnicht weiterweisst

Gehe in EXTRAS -> OPTIONEN -> ANSICHT und mache das häkcen bei "nullwerte anzeigen raus"

zellenformat darf nicht "zahl" sein, sonst steht da ne null drin, wenn excel die zelle berechnet

geht sicher mit excel, mit excel (vba) geht alles. bräuchte aber mehr details, Stehen die Zahlen alle in einer spalte oder ale in einer zelle? hab ich nicht ganz verstanden.