Spostare selezione di celle Excel sempre alla stessa colonna

marco · 08-16-2009, 03:46 PM

Ciao a tutti.
Volevo sapere qual'era il sistema più semplice per spostare una selezione di celle all'interno di un foglio Excel (indipendentemente da qualunque parte del foglio mi trovi) per portarla sempre sotto la stessa colonna.
Faccio un esempio per capirci meglio.
Ho una selezione che può essere una sola cella (C3) oppure un insieme di celle in verticale con la superiore attiva (A3:A4).
Io voglio fare in modo che entrambi i casi, mi vengano selezionate le rispettive celle ma sotto la colonna B, quindi la B3 nel primo caso e la B3:B4 (con la B3 attiva) nel secondo caso.
Qual'è la procedura più semplice da seguire o altrimenti quali righe di codice VBA da utilizzare?
Grazie

Zeno · 10-13-2009, 10:30 PM

Non so se è la più semplice, ma è comunque una soluzione funzionante.

codice:

Public Sub selezioneB()
    Dim rng As Range
    Dim rngB As Range
    Dim nRows As Long
    Dim nRow As Long
    Set rng = Selection
    With rng
        nRows = .Rows.Count
        nRow = .Row
    End With
    If nRows > 1 Then
        Set rngB = Range("B" & nRow & ":B" & nRow + nRows - 1)
    Else
        Set rngB = Range("B" & nRow)
    End If
    rngB.Select
End Sub

Discussioni simili
Discussione	Ha iniziato questa discussione	Forum	Risposte	Ultimo messaggio
Accedere a celle foglio Excel con javascript	phpweb	Informatica	0	11-12-2009 10:31 AM
Rendere il testo minuscolo in una selezione di celle Excel	marco	Informatica	1	10-13-2009 02:21 PM
Macro Excel che esegua una somma numeri nella stessa cella	PIPPO1	Informatica	3	07-26-2008 07:12 PM
Riempendo con i colori le celle Excel, non compare il colore	djfulmine	Informatica	4	01-11-2008 08:44 PM
Rimuovere collegamenti ipertestuali da una selezione di celle	gabriele	Informatica	2	10-15-2007 09:12 PM

Menu

Spostare selezione di celle Excel sempre alla stessa colonna