03. april 2018 - 13:28Der er
7 kommentarer og 1 løsning
VBA IF Then finder ikke min værdi
Hej
Jeg er rendt i et problem, Når jeg afvikler følgende kode , finder den ikke 3M værdien som jeg ønsker på trods af den er angivet flere gange í den kolonne jeg søger i. Ved et tilfælde opdagede jeg at hvis jeg slettet værdien 3M og angiver den igen, Så kan den findes. Mit eget bud er den måde som dataen er formateret, dog har jeg prøvet at formatere cellerne manuelt, det virker bare ikke.
Håber der findes en venligst sjæl der vil hjælpe mig videre.
PÅ forhånd tak
Sub Single_Loop_Example()
Dim LCount As Integer Dim LRow As Long Dim CC As Long
Sheets("vov").Select CC = 6 'vandret LRow = Cells(Rows.Count, CC).End(xlUp).Row
For LCount = 2 To LRow Debug.Print LCount 'If Cells(LCount, CC).text = "3M" Then Cells(LCount, CC + 1).text = "3M" If Cells(LCount, CC).text = "3M" Then MsgBox "3M" 'If Cells(LCount, CC).Value = "3L" Then Cells(LCount, CC + 1).Value = "3L"
Det kommer ind via et udtræk fra vores portale og får navnet xxxxx.aspx (Read-Only) hvor det efterfølgende gemmes på det lokale drev i excel format. Udtræk er en matrice hvor ikke alle felterne er udfyldt, derfor køre jeg først et job, hvor jeg opsætter det hele i en række koloner. For herefter at kunne behandle det i en privot - tabel.
Måske. Min erfaring er i helt andre sammenhænge. Men jeg har både været ude for blanktegn af en slags og noget der lignede en ' (apostrof) foran de importerede værdier i Excel.
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.