AI bliver først for alvor en del af arbejdet, når teknologien integreres i den måde, vi arbejder på. At have adgang til AI betyder ikke nødvendigvis, at medarbejderne er klar til at bruge den.
Det er UpperCase jeg mener, men mit problem er, at jeg skriver en tekst ud fra databsen, der både indholder store og små bogstaver. Jeg har ikke brug for at replace teksten jeg søger efter i den pågældende string, jeg tilføjer bare noget html, så f.eks. Hest bliver til <b>Hest</b>.
Hvis jeg bruger "... 1, -1, vbTextCompare)" bliver alt til lowerCase, så UCase("streng") var bare en tålelig løsning.....men ikke helt godt.
OK, måske ved jeg hvad du snakker om... Prøv nedenstående funktion:
function ReplaceAndMore(str, searchStr) tmpStr = Replace(str, vbCrLf, "<br>")
i = InStrRev(tmpStr, searchStr, Len(tmpStr), vbTextCompare) do until i = 0 or j > 5 tmpStr = Mid(tmpStr, 1, i - 1) & "<b>" & Mid(tmpStr, i, Len(searchStr)) & "</b>" & Mid(tmpStr, i + Len(searchStr))
i = InStrRev(tmpStr, searchStr, i, vbTextCompare) loop ReplaceAndMore = tmpStr end function
searchStr = "hest" str = "bbe1379 havde en lille Hest" & vbCrLF & "og en stor Hest"
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.