-
GAMEPOD.hu
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Delila_1
Topikgazda
Nem írtad, hány oszlopod van a Munka1-en. Feltételezem, akkor kell átmásolni az adatokat, mikor minden oszlopot kitöltöttél. A makróban 3 oszlopot vettem alapul, az
If Target.Column = 3 Then
sorban ezt kell módosítanod. A makrót a laphoz rendeld.Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Dim usor As Long
usor = Sheets("Munka2").Range("A50000").End(xlUp).Row + 1
Rows(Target.Row).Copy Sheets("Munka2").Cells(usor, 1)
End If
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
Tényleg elkerülte a figyelmemet, elnézést.
A Munka1 laphoz rendelt makró:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Dim usor As Long
usor = Sheets("Munka2").Range("A50000").End(xlUp).Row + 1
Rows(Target.Row).Copy
beilleszt usor
End If
End SubÉs most a VB szerkesztőben a füzetedhez nyiss új modult. Insert, Module.
A kapott üres lapra ez jön:Sub beilleszt(usor)
Sheets("Munka2").Select
Rows(usor).Select
Selection.PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
Sheets("Munka1").Select
End SubÍgy már értéket illeszt majd be a Munka2-re.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Mutt
aktív tag
válasz tzetko #18630 üzenetére
Hello,
Az Excelben makroval ki akarom kapcsolni az automatikus helyreálítást. Auto openbe be akarom rakni, ha megnyitom az Excelt akkor a korábbi (bal oldalt lévő) helyre állított fájlokat automatikusa törölje.
Csak egy munkafüzet esetén:
ActiveWorkbook.EnableAutoRecover = FalseMiért nem kapcsolod ki véglegesen? File->Beállítások->Mentés->Automatikus helyreállítás.. pipa ki.
VBA-ban:
Application.AutoRecover.Enabled = Falsehttp://support.microsoft.com/kb/289273
üdv
A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
Új hozzászólás Aktív témák
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Ozeki Kft.
Város: Debrecen