scusatemi ho un'altro problema
ho una colonna dove devo inserire la data come testo e possibile che dando ok
mi si inseririsce in automatico anche nell'altra cella?
per esempio data nella colonna F e l'altra nella colonna H
grazie
Moderatori: Anthony47, Flash30005
=Se(A2="";"";A2)
Private Sub Worksheet_Change(ByVal Target As Range)
CheckArea = "F2:F1000"
If Not Application.Intersect(ActiveCell, Range(CheckArea)) Is Nothing Then
ActiveCell.Offset(-1, 1).Value = Selection.Offset(-1, 0).Value
End If
End Sub
Anthony47 ha scritto:Flash, l' hai provata??
Private Sub Worksheet_Change(ByVal Target As Range)
CheckArea = "F2:F1000"
If Application.Intersect(Target, Range(CheckArea)) Is Nothing Then Exit Sub
Application.EnableEvents = False
Target.Offset(0, 2).Value = Target.Value 'Offset(0,2) per puntare dalla F alla H
Application.EnableEvents = True
End Sub
ActiveCell.Offset(-1, 2).Value = Selection.Offset(-1, 0).Value
Public AAAA As Integer
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Range("A1:A10"), ActiveCell) Is Nothing Then Exit Sub
AAAA = AAAA + 1
[A14] = [A1]
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox (AAAA)
AAAA = 0
End Sub
Public Cicli, AAAA As Integer
Private Sub Worksheet_Change(ByVal Target As Range)
CheckArea = "F2:F3"
Cicli = Cicli + 1
If Not Application.Intersect(ActiveCell, Range(CheckArea)) Is Nothing Then
ActiveCell.Offset(-1, 1).Value = Selection.Offset(-1, 0).Value
If AAAA = 0 Then MsgBox "Cicli " & Cicli
AAAA = AAAA + 1
End If
MsgBox " AAAA " & AAAA
End Sub
Sub Azzera()
Cicli = 0
AAAA = 0
End Sub
'If Not Application.Intersect(ActiveCell, Range(CheckArea)) Is Nothing Then
Torna a Applicazioni Office Windows
Macro che scatta quando cambia dato in un altro file Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 5 |
Problema con macro copia e rinomina file Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 2 |
Formula Excel copia righe e colonne Autore: Francesco6918 |
Forum: Applicazioni Office Windows Risposte: 2 |
Visitano il forum: Nessuno e 31 ospiti