CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede mikkelrud Nybegynder
03. juli 2006 - 19:26 Der er 3 kommentarer og
1 løsning

Skille tal fra tekst - til "excellent"

X Jeg har en lang kolonne, som indeholder både tal og tekst i samme celle. Tal er fra rekvistionsnr og tekst er leverandør. Fx "32554 TDC" eller "DSB 1122". Dvs. tal står både foran og efter tekst og tal er af forskellig længde. Er der en der har en makro til denne opgave? Jeg har søgt her på siden uden held.

På forhånd tak :-)
Avatar billede excelent Ekspert
03. juli 2006 - 19:29 #1
Sub koverter()

Dim i, j, x, Indhold, tal

For i = 1 To 100
Indhold = ActiveCell.Value
  x = Len(Indhold)
  For j = 1 To x
    If IsNumeric(Mid(Indhold, j, 1)) Then tal = tal & Mid(Indhold, j, 1)
  Next
  ActiveCell.Offset(0, 0).Value = tal
tal = ""
ActiveCell.Offset(1, 0).Activate
Next
ActiveCell.End(xlUp).End(xlUp).Activate

End Sub
Avatar billede excelent Ekspert
03. juli 2006 - 19:30 #2
marker første værdi og kør makro
Avatar billede excelent Ekspert
03. juli 2006 - 19:31 #3
For i = 1 To 100 ' ret til aktuel antal rækker
Avatar billede excelent Ekspert
03. juli 2006 - 19:36 #4
marker box med mit navn, og klik accepter
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Excel kurser
Excel-kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Fjern markering på enkelte linjer Af TheLibrarian i Excel 1 I går 10:03 I går 16:52
lookup Af tjodense i Excel 5 08/07/202513:38 09/07/202509:27
Mellem tidspunkter Af nyhavn18 i Excel 3 02/07/202519:07 03/07/202506:29
Oversigt over antal feriedage Af AnjaJesse i Excel 8 02/07/202510:02 03/07/202509:11
Brugere må gerne redigere, men ikke overskrive default sortering eller filtrering Af mj72 i Excel 6 30/06/202516:17 04/07/202511:40
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 13:15 Microsoft 365 personel Af ejgil703 i E-mail programmer
I dag 08:43 USB strømforsyning til PD 5V/2.4A eller 9V/3A Af Joakim i Andet hardware
I går 21:07 Office-programmer lukker ned ved opstart Af Morten i Office & Kontorpakker
I går 13:26 Windows 10 Home tager alt min Harddisk plads Af Bexelbud i Windows
I går 10:03 Fjern markering på enkelte linjer Af TheLibrarian i Excel
White papers
Flere white papers »


Premium
Teaser billede
Microsoft udskyder vigtig ændring for partnerne: Får tre måneder mere, ellers falder hammeren
Læs mere »
Fremadstormende Conscia i nyt gigantopkøb – bliver det største i selskabets historie
Itm8 kæmper med blødende bundlinje og skuffende salg: "Ikke tilfredsstillende"
Denne 37-årige russiske hackerkonge har flået adskillige danske virksomheder – og har tjent styrtende på det
Se alle »
Computerworld
Teaser billede
Hackerne slog til mod Humac – direktøren skiftede forklaring på en uge: Nu flyder pas frit på nettet
Læs mere »
Verdens største it-distributør ramt af ransomware: VPN mistænkt som indgang
Elon Musks nye AI-model Grok 4 er hundedyr – men den fejer alle konkurrentere af banen i ny analyse
Test: Endelig et OLED-tv, der giver dig masser af lys og power
Se alle »
CIO
Teaser billede
Kæmpe it-distributør er tilbage i drift efter ransomware-angreb: "Har arbejdet døgnet rundt"
Læs mere »
Borgere kunne læse andres beskeder i Digital Post: Nu får Digitaliseringsstyrelsen kras kritik for mangler i sikkerheden
En af landets dygtigste CISO'er stopper i Arla: Thomas Zuliani har fået nyt job
Banedanmark skal have ny CISO: Derfor kvitter Morten Pedersen sin stilling
Se alle »
Job & Karriere
Teaser billede
It-chef og halv it-afdeling fyret i forsikringsselskab på grund af kommentar om potteplante
Læs mere »
Danske it-folk tør ikke længere skifte job hele tiden - og det er der en særlig årsag til
Itm8 fyrer: Opsiger ansatte og reorganiserer
Fagforbund slår alarm over Netcompany: "Man risikerer at knække halsen på deres arbejdsmiljø"
Se alle »
White paper
Teaser billede
Sikkerhed gjort enkelt: Beskyt din virksomhed direkte i browseren
Læs mere »
Gør din backup til et aktiv i cybersikkerhedsindsatsen
Få reel viden om datasuverænitet og tag selv kontrollen
Cybersikkerhed 2025: Er din branche blandt de mest udsatte?
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »