Trim functie in Access

Status
Niet open voor verdere reacties.

janemmers

Gebruiker
Lid geworden
28 aug 2001
Berichten
218
Met behulp van een deel van de velden van de databeas wordt een path gemaakt om daarmee een excelbestand te openen mbv een knop.

Op dit moment gebruik ik onderstaand code
Het gaat mis als een client geen tussenvoegsel heeft., dan wordt het path niet gevonden (een spatie te veel). Weet iemand op welke wijze ik dit kan aanpassen. Ik vermoed dat dit met de functie Trim te maken heeft maar weet niet hoe ik die moet opnemen in onderstaande code.


Private Sub Knop127_Click()
Dim xl As Object
Dim Excel As Object
Dim FullPath As String
FullPath = "U:\Temp\Rapportagetest\" & Me.Achternaam & "-" & Me.Voornaam & " " & Me.Tussen & "\signaleringsplan.xlsx"
Set xl = CreateObject("Excel.Application")
xl.Visible = True
On Error Resume Next
xl.UserControl = True
xl.Workbooks.Open (FullPath)
End Sub
 
Wijzig

Code:
FullPath = "U:\Temp\Rapportagetest\" & Me.Achternaam & "-" & Me.Voornaam & " " & Me.Tussen & "\signaleringsplan.xlsx"

in

Code:
FullPath = "U:\Temp\Rapportagetest\" & Me.Achternaam & "-" & Me.Voornaam & _
  IIf(Me.Tussen = "";"";" " & Me.Tussen) & "\signaleringsplan.xlsx"

Een trim functie is dan niet nodig.

Veel Succes.
 
Kan mooier:
Code:
FullPath = "U:\Temp\Rapportagetest\" & Me.Achternaam & "-" & Me.Voornaam & " " + Me.Tussen & "\signaleringsplan.xlsx"
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan