PNG32 PNG32 PNG32 PNG32
PNG32
Forum Excel, VBA, VSTO, Exceltips, Excelhj�lp PNG32 drivs av Excelspecialisten    Logga in     English
PNG32
PNG32 PNG32
PNG32

Logga in

PNG32

Du är inte inloggad. Logga in eller registrera dig för att skriva inlägg eller svara på inlägg.

För frågor om forumet, kontakta oss på webmaster@excelforum.se

PNG32 PNG32
PNG32 PNG32
PNG32

Excelforum

PNG32

 
ForumForumDiskussionerDiskussionerExcelExcelFlytta markörenFlytta markören
Föregående Föregående
 
Nästa Nästa
Nytt inlägg
 2011-07-13 14:15
 

Hur gör jag ett makro som flyttar markören till dagens datum i en matris som innehåller en kolumn med årets alla datum.

Tacksam för hjälp

MVH Tommy

Nytt inlägg
 2011-07-14 23:13
 

Hej,

följande kanske kan jhälpa dig?

Sub Dagens()
'
Set datum = Range("A:A")
Set sista = datum.SpecialCells(xlCellTypeLastCell)
For i = 1 To sista.Row
    If datum(i).Value = Date Then
        datum(i).Select
    End If
Next i
End Sub

Mvh Khaleb

Nytt inlägg
 2011-07-15 13:59
 

Tack Khaleb för att du vill hjälpa mej med mitt makroproblem.

De du har föreslagit mej kan jag inte få att fungera.

Jag förklarar lite mer i detalj vad det är jag försöker att åstadkomma.

Jag har ett kalkylblad som innehåller en budgetuppföljming med många andra makron.

Bland annat har jag en lista "matris" med transaktioner ut och in från ett konto.

Matrisen spänner över följande: cell AT4 till AZ250. Kolumn AU, alltså 2:a kolumnen i matrisen är en datum kolumn.

Vid varje transaktion får denna kolumn ett datum, och matrisen sorteras då i stigande ordning efter datumkolumnen.

Listan "matrisen" innehåller också kommande transaktioner med datum fram i tiden.

Min önskan är att få ett makro som flyttar markören från cell A1 till dagens datum i matrisen. Då kan jag direkt se kontots innehåll för dagen samt

nyligen gjorda transaktioner och närmast kommande transaktioner.

På förhand tack för all hjälp

Tommy 

Nytt inlägg
 2011-07-15 14:40
 

Hej Tommy,

jag har anpassat makrot så att det letar i kolumn AU efter dagens datum. Makrot kommer att markera cellen i kolumn AU som har dagens datum.

Sub Dagens()
Set datum = Range("AU:AU")
Set sista = datum.SpecialCells(xlCellTypeLastCell)
For i = 4 To sista.Row
    If datum(i).Value = Date Then
        datum(i).Select
    End If
Next i
End Sub

Håller tummarna för att det fungerar

mvh Khaleb

Nytt inlägg
 2011-07-15 15:36
 

Tack igen Khaleb, snabbt svar.

Jag kom nyss in ingen. Jag skall göra ett nytt försök att applicera det nya makrot.

Hoppas jag får återkomma om jag misslyckas.

Ha en fortsatt bra dag

MVH

Tommy

 

Nytt inlägg
 2011-07-15 16:00
 

DET FUNKAR........DU ÄR EN STJÄRNA KHALEB.

Det enda jag behövde lägga till för att se hela matrisens bredd var:

ActiveWindow.SmallScroll ToRight:=6

Idag var en bra dag för mej tack vare dej.

Jag önskar dej en trevlig helg Khaleb

MVH

Tommy

 

Nytt inlägg
 2011-07-15 16:24
 

Vad kul!

trevlig helg du med!

Föregående Föregående
 
Nästa Nästa
ForumForumDiskussionerDiskussionerExcelExcelFlytta markörenFlytta markören

PNG32 PNG32
Excelforum drivs av Excelspecialisten som bedriver utbildning i Excel och VBA, tillhandahåller support och hjälp med Excel, utvecklar program i Excel. Är ni i behov av en konsult inom Excel, VBA eller VSTO, eller söker en excelkurs, kontakta oss.
Copyright 2013 ExcelSpecialisten XLS AB   Användarvillkor  Personliga uppgifter