Moderatori: Anthony47, Flash30005
Sub PHLeft()
Dim nPH As Long
'
With Selection.Cells(1, 1)
nPH = .End(xlDown).Row
cphc = .Column
Range(.End(xlToLeft), Cells(nPH, cphc - 1)).Select
End With
End Sub
Sub PHRight()
Dim nPH As Long
'
With Selection.Cells(1, 1)
nPH = .End(xlDown).Row
cphc = .Column
Range(.End(xlToRight), Cells(nPH, cphc + 1)).Select
End With
End Sub
Anthony47 ha scritto:magari avendo memorizzato le suddette macro nel Personal.xlsm.
Torna a Applicazioni Office Windows
Mettere tutto MAIUSCOLO un range di celle Autore: raimea |
Forum: Applicazioni Office Windows Risposte: 7 |
Trasformare celle con formattazioni in html Autore: servicedynergy |
Forum: Applicazioni Office Windows Risposte: 5 |
inserisci valore in celle a seguito di condizione Autore: ucame |
Forum: Applicazioni Office Windows Risposte: 10 |
Codice per popolare celle con condizione Autore: ucame |
Forum: Applicazioni Office Windows Risposte: 3 |
Visitano il forum: Nessuno e 25 ospiti