Risultati da 1 a 14 di 14

Discussione: Indirizzo cella selezionata



  1. #1
    L'avatar di broadband
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Napoli
    Messaggi
    31
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    3

    Indirizzo cella selezionata

    E' possibile scrivere in A1 l'indirizzo della cella selezionata?
    Sono riuscito a farlo con l'aiuto di vba in questo modo

    Codice: 
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim rif As Variant
    rif = ActiveCell.Address
    Worksheets("Base").Range("AL1") = rif
    End Sub
    ma in questo modo CTRL+Z (annulla) non funziona più.
    Ultima modifica fatta da:cromagno; 09/02/16 alle 18:33 Motivo: Inserito codice tra i Tag CODE...

  2. #2
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3338
    Versione Office
    2013 PC
    Likes ricevuti
    481
    Likes dati
    49
    Citazione Originariamente Scritto da broadband Visualizza Messaggio
    E' possibile scrivere in A1 l'indirizzo della cella selezionata?
    Sono riuscito a farlo con l'aiuto di vba in questo modo

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim rif As Variant
    rif = ActiveCell.Address
    Worksheets("Base").Range("AL1") = rif
    End Sub

    ma in questo modo CTRL+Z (annulla) non funziona più.
    Ciao broadband l'esecuzione del VBA non permette di annullare un'operazione qualunque essa sia. Infatti se guardi la freccia blu (quella che torna indietro di un'operazione come l ctrl+z) nella barra dei menù, non è attiva.

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  3. #3
    L'avatar di broadband
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Napoli
    Messaggi
    31
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    3
    E non c'è un modo per avere lo stesso risultato senza passare per vba utilizzando solo le formule?
    Posso creare una funzione che mi fa questo lavoro? Tipo la funzione oggi() che riporta la data?

  4. #4

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2807
    Versione Office
    Excel 2013
    Likes ricevuti
    1020
    Likes dati
    978
    Una soluzione per "registrare" il percorso di ogni selezione potrebbe essere quella di salvare su una colonna d'appoggio ogni volta che si seleziona una cella tipo:
    Codice: 
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim rif As Variant
    Dim uRiga As Long
    
    
    rif = ActiveCell.Address
    uRiga = Range("a" & Rows.Count).End(xlUp).Row + 1
    
    
    Worksheets("Base").Range("AL" & uRiga) = rif
    End Sub
    

  5. #5
    L'avatar di broadband
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Napoli
    Messaggi
    31
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    3
    Citazione Originariamente Scritto da Rubik72 Visualizza Messaggio
    Una soluzione per "registrare" il percorso di ogni selezione potrebbe essere quella di salvare su una colonna d'appoggio ogni volta che si seleziona una cella tipo:
    Codice: 
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim rif As Variant
    Dim uRiga As Long
    
    
    rif = ActiveCell.Address
    uRiga = Range("a" & Rows.Count).End(xlUp).Row + 1
    
    
    Worksheets("Base").Range("AL" & uRiga) = rif
    End Sub
    
    ma cosi non ho risolto il problema della la freccia blu (quella che torna indietro di un'operazione come l ctrl+z) nella barra dei menù:223:

  6. #6

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2807
    Versione Office
    Excel 2013
    Likes ricevuti
    1020
    Likes dati
    978
    Come ti ha già suggerito Baloon_50 nel #2 il VBA non permette di tornare indietro.

  7. #7
    L'avatar di broadband
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Napoli
    Messaggi
    31
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    3
    Citazione Originariamente Scritto da Rubik72 Visualizza Messaggio
    Come ti ha già suggerito Baloon_50 nel #2 il VBA non permette di tornare indietro.
    ok e infatti ho chiesto se era possibile creare una funzione excel personalizzata che restituisse l'indirizzo della cella selezionata o almeno solo la riga :286:

  8. #8

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923
    Ciao a tutti,
    giusto per capire...
    Ma a cosa ti serve "annullare l'operazione" (o CTRL+Z) ????
    Per cancellare l'indirizzo che hai ottenuto dalla cella A1?

    Te lo chiedo perchè magari capendo il tuo scopo si potrebbe cercare di trovare una soluzione.
    Con la funzione personalizzata avresti sempre lo stesso problema.

    Esempio:
    Crea un nome definito e chiamalo address.
    Dopo, nel modulo di classe di "ThisWorkbook" (o "Questa_cartella_di_lavoro") metti questo codice:

    Codice: 
    Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    ThisWorkbook.Names("address").Value = Selection.Address
    End Sub
    Mentre in un modulo normale metti questo per la funzione:

    Codice: 
    Function CellaSelezionata() As String
    Application.Volatile
    CellaSelezionata = [Address]
    End Function
    A questo punto, nella cella (in qualsiasi foglio) dove vuoi l'indirizzo della cella o del range selezionato, scrivi:

    =CellaSelezionata()

    Ma il tasto "Annulla" (freccia blu indietro) rimarrà comunque disattivo :273:
    File Allegati File Allegati

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  9. #9
    L'avatar di broadband
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Napoli
    Messaggi
    31
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    3
    Devo far colorare l'intervallo della riga corrispondente selezionata.
    Esempio mi trovo in N12 e tramite la formattazione condizionale mi coloro da A12:D12, mi trovo Z24 e mi coloro A24:D24.
    Se leggi il primo messaggio ci sono riuscito tramite il VBA (scopiazzando il VBA perchè non sono capace li) ma come ho capito la freccia blu per tornare indietro si disattiva e per me sarebbe un problema perchè mi potrebbe capitare, come già successo, di eliminare colonne o righe o incollare in posti sbagliati (diciamo commettere un errore) senza avere la possibilità di rimediare.:223:

  10. #10
    L'avatar di broadband
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Napoli
    Messaggi
    31
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    3
    Citazione Originariamente Scritto da broadband Visualizza Messaggio
    Devo far colorare l'intervallo della riga corrispondente selezionata.
    Esempio mi trovo in N12 e tramite la formattazione condizionale mi coloro da A12:D12, mi trovo Z24 e mi coloro A24:D24.
    Se leggi il primo messaggio ci sono riuscito tramite il VBA (scopiazzando il VBA perchè non sono capace li) ma come ho capito la freccia blu per tornare indietro si disattiva e per me sarebbe un problema perchè mi potrebbe capitare, come già successo, di eliminare colonne o righe o incollare in posti sbagliati (diciamo commettere un errore) senza avere la possibilità di rimediare.:223:
    e pensavo che magari creando una funzione personalizzata si potesse ovviare al problema...:186:

  11. #11

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Verona Provincia
    Età
    57
    Messaggi
    1011
    Versione Office
    .
    Likes ricevuti
    365
    Likes dati
    0
    Non serve il VBA.

    Seleziona A1 quindi, per la formattazione condizionale usa questa regola:
    =CELLA("riga")=RIF.RIGA()
    imposta il formato del riempimento e in "Si applica a:" metti =$A:$D
    Copia il formato da A1 alle celle sottostanti.

  12. I seguenti 2 utenti hanno dato un "Like" a scossa per questo post:


  13. #12
    L'avatar di broadband
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Napoli
    Messaggi
    31
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    3
    Citazione Originariamente Scritto da scossa Visualizza Messaggio
    Non serve il VBA.

    Seleziona A1 quindi, per la formattazione condizionale usa questa regola:
    =CELLA("riga")=RIF.RIGA()
    imposta il formato del riempimento e in "Si applica a:" metti =$A:$D
    Copia il formato da A1 alle celle sottostanti.
    Bravo ho imparato una nuova cosa e grazie per il consiglio.
    Però c'è un problema le celle si colorano se scrivo qualcosa all'interno invece a me serviva al solo selezionare della cella

  14. #13

    L'avatar di scossa
    Clicca e Apri
    Data Registrazione
    Jul 2015
    Località
    Verona Provincia
    Età
    57
    Messaggi
    1011
    Versione Office
    .
    Likes ricevuti
    365
    Likes dati
    0
    Metti questo codice nel modulo del foglio dove hai la formattazione condizionale:

    Codice: 
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      Target.Calculate
    End Sub
    Bye!
    scossa
    scossa's web site
    ___
    Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)

  15. I seguenti utenti hanno dato un "Like"


  16. #14
    L'avatar di broadband
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Napoli
    Messaggi
    31
    Versione Office
    2010
    Likes ricevuti
    0
    Likes dati
    3
    Citazione Originariamente Scritto da scossa Visualizza Messaggio
    Metti questo codice nel modulo del foglio dove hai la formattazione condizionale:

    Codice: 
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      Target.Calculate
    End Sub
    Spettacolo Scossa!:208: Grazie mille... Risultato ottenuto e cosi facendo è anche attiva la freccia blu per tornare indietro... Incredibile!

Discussioni Simili

  1. Calcolo classifica alla giornata selezionata
    Di nick0573 nel forum Domande su Excel in generale
    Risposte: 3
    Ultimo Messaggio: 20/01/17, 07:15
  2. Risposte: 3
    Ultimo Messaggio: 08/04/16, 12:34
  3. Indirizzo cella selezionata
    Di broadband nel forum Domande su Excel in generale
    Risposte: 1
    Ultimo Messaggio: 09/02/16, 17:19
  4. Inserimento dati da un indirizzo ,e filtrare
    Di Fhazza nel forum Domande su Excel VBA e MACRO
    Risposte: 2
    Ultimo Messaggio: 02/02/16, 00:19
  5. Relazione tra INDIRIZZO INDIRETTO con valori uguali
    Di ModdDan nel forum Domande su Excel in generale
    Risposte: 6
    Ultimo Messaggio: 15/01/16, 21:28

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •