Search results

Hi arnelgp, this is nearly perfect :-) However is it somehow in your Code possible if there is non of the above that it returns the string it has been passed in strText? It is only one Data which is blank but it has none of the above requirement as mentioned! Sorry is it possible? To have it...

@Gasman yes I can do that but however there are only a few with no IBAN in the string Either in the beginning of the string then I need to check if there is "Zahlungsreferenz" in it or if there is "Auftraggeberreferenz in it if there is IBAN somewhere else in the String I need the...

Hi guys, many thanks for your all help! @arnel unfortunately it does not return all the requiered string with your function. :( @Minty I get an error as in some cases there is mEndPos or mStartPos 0 wich is when thre is non included as mentioned in my posts there are either IBAN at the...

ok this is that I got at present Public Function ReturnUMS01(strText As String) As String If strText Like "IBAN*" Then If strText Like "*Zahlungsreferenz*" Then mStartPos = Ibanlength(strText) + 2 mEndPos = InStr(strText, "Zahlungsreferenz:") - 1...

A String I like to find is something like this one "Allianz IBAN: AT70 1000 6666 7777 8888 Creditor-ID: AT25AEV00000004433 0 Auftraggeberreferenz: AEV21355-E00695611 SEPA-Lastschrift A559725496 Albert REF: 1200021122706174766477677966" But it does not jump into the Statement .. no Error just...

Hi guys, unfortunately not working as yet :( It is surely simple but I can not get my head around it ..pff

Hi guys, I know this has been discussed in the formum but for my issue I can not seam to make it work. What I like to do is following Public Function ReturnUMS01(strText As String) As String If strText Like "IBAN*" Then If strText Like "*Zahlungsreferenz*" Then...

Hi ok I understand! Thanks

Hi, just wondering why the VBE does not let me jump to a custom function when trying to to to the definition? Public Sub FillTmpAuszugColumns() Dim strSQL As String strSQL = "UPDATE tmpAuszug SET tmpAuszug.Mandatsnummer = ReturnMandatsnummer([tmpAuszug].[Umsatztext]), " & _...

Hi guys, thanks for the discussion this is bringing some light into my question ) However as I read through your thougts I was wondering to simpify it can you just create some kind of Switch Board in the "Master DB" to open one DB work with it and if finished just close it? And if you need to...

Ok thanks MajP, I will look into it a little more and see how I will go about it! But thanks for explaining :) Cheers

Hi MajP, thanks for your explaination! Ok well I thought for my business it would be nice to have one "Application" to do it all but if that is not a good practice I will overthink it again ) Cheers Albert

Lol really hihi I will try many thanks ) Not sure how you use chatGPT need to look into it I guess )

Hi, there are not always the same as mentioned once I use a query to filter it out. And I am used to use instr or instrRev functions to get the possitions as you mentioned but was wondering if there is in Reg Ex a simpler way of doing it. I will try anyway with those functioned mentioned ) Cheers

Hi thanks for your input! Ok understand! Cheers

Hi guys, I know some of you guys are pretty awsome in Reg Ex but I am not lol--- So I was hoping for some help with following String Kunner GmbH Oberwasser 69 AT 6666 Walddorf IBAN: AT75 1683 0021 0000 0166 DOC/2319/2667.60/20220729 REF: 195302208230116494800000001 Josef und Anne Schöller...

Hi guys, I got different Access Databases and was wondering if I can make one Application to Access those different Databases. I am aware of linking data to another database and so on but is it possible to have say one Database to access different Databases something like one Form that can open...

Hi MajP, many thanks for your help that is it!! Fantastic! I found Format and Currency but not the whole statement! Cheers! Albert

Yes Gasman :( Euros in my case )

Hi guys, I guess it is a simple question and answer but I can not get it to work. I like to use bookmarks to fill a word ducument but need Euro Currency for the amount. .Bookmarks("vv_AppBrutto").Range = Me.txtAppBrutto.Value this is what I got at present. How do I need to change it...