Come trovare tutte le possibili somme di due numeri in un elenco in Excel?
Se devi trovare tutte le possibili somme di due numeri in un elenco o generare tutte le combinazioni possibili tra due elenchi in Excel, non esistono funzioni integrate per ottenere direttamente questi risultati. Questa guida ti propone una soluzione basata su codice VBA per calcolare le somme e l’utilità **Elencare tutte le combinazioni** di Kutools per Excel per gestire in modo rapido ed efficiente le combinazioni.
Find all possible sums of two numbers in a list with VBA code
Find all possible combinations of two lists with List All Combinations 
Find all possible sums of two numbers in a list with VBA code
Se desideri trovare tutte le possibili somme di due numeri in un elenco, puoi utilizzare il seguente codice VBA.
1. Premere i tasti Alt + F11 per visualizzare la finestra Microsoft Visual Basic for Applications.
2. Fare clic su Insert > Module, quindi copiare e incollare il codice seguente nel modulo.
VBA: List all possible sums of two numbers in a list
Sub Combinations()
'UpdatebyExtendoffice20180628
Dim xRgArr
Dim xNum As Long
Dim I, J, K As Long
Dim xTemp As Double
Dim xRg As Range
Dim xRgCount As Long
Dim xDic As New Dictionary
On Error Resume Next
Set xRg = Application.InputBox("Select a list (one column):", "KuTools for Excel", Selection.Address, , , , , 8)
If (xRg Is Nothing) Or (xRg.Count = 1) Then Exit Sub
xRgCount = xRg.Count
K = 1
ReDim xRgArr(1 To xRgCount)
For Each xCell In xRg
xRgArr(K) = xCell.Value
K = K + 1
Next
K = 0
For I = 1 To xRgCount
For J = I + 1 To xRgCount
xTemp = xRgArr(I) + xRgArr(J)
If Not xDic.Exists(xTemp) Then
xDic.Add CDbl(xTemp), CStr(xTemp)
K = K + 1
End If
Next
Next
Range("C1").Resize(xDic.Count, 1) = Application.WorksheetFunction.Transpose(xDic.Keys)
End Sub
3. Fare clic su Tools > References. Nella finestra di dialogo visualizzata, selezionare la casella Microsoft Scripting Runtime.
 |  |  |
4. Fare clic su OK per chiudere la finestra di dialogo, quindi premere F5 per eseguire il codice. Verrà visualizzata una finestra di dialogo che chiederà di selezionare un elenco per calcolare le possibili somme.
5. Fare clic su OK e tutte le possibili somme di due numeri dell’elenco verranno visualizzate nella colonna C.
Suggerimento: Nella stringa di codice Range("C1").Resize(xDic.Count, 1), puoi sostituire C1 con qualsiasi altra cella in cui desideri inserire i risultati.
Find all possible combinations of two lists with List All Combinations
Se desideri elencare tutte le possibili combinazioni di due elenchi, come mostrato nell’immagine seguente, l’utilità List All Combinations di Kutools for Excel può esserti d’aiuto.
1. Fare clic su Kutools > Insert > List All Combinations.
2. Nella finestra di dialogo List All Combinations, fai clic sul pulsante di selezione per scegliere il primo elenco da combinare.
3. Fare clic su Add per aggiungere l’elenco alla sezione Combinations list.
4. Ripetere i passaggi 2 e 3 per aggiungere il secondo elenco alla Combinations list.
5. Quindi fai clic su Ok per selezionare una cella in cui inserire il risultato delle combinazioni.
6. Fare clic su OK. Tutte le possibili combinazioni sono state elencate nelle celle.
Kutools per Excel– Potenzia Excel con oltre 300 strumenti essenziali, rendendo il tuo lavoro più veloce e semplice, e sfrutta le funzionalità basate sull’IA per un’elaborazione dati più intelligente e una maggiore produttività.Scaricalo ora
Demo: Trova tutte le possibili combinazioni di due elenchi con Kutools per Excel
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi