Discussion :

[kalu]

Bonjour, auriez vous une idée sur l'origine de mon bug:

Erreur d'exécution '28': Espace pile insuffisant.

Pour info "TabActionsFonds" fait référence à une plage définit dans le fichier excel.
La fonction s'arrete systématiquement à l'une de ces 2 lignes:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Nb = Range("TabActionsFonds").Rows.Count

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TabActionsFonds = Range("TabActionsFonds")

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Public Function TriActionsFonds() As Variant
 
Dim TabActionsFonds As Variant
Dim DateValtrans As String
Dim Auj As Double
Dim Nb As Integer
Dim i As Double
Dim j As Double
Dim k As Double
Dim col As Double
Dim test As Double
Dim ActionsFonds As Variant
 
ReDim ActionsFonds(1 To 10, 1 To 2)
 
Nb = Range("TabActionsFonds").Rows.Count
 
ReDim TabActionsFonds(1 To Nb, 1 To 4)
 
TabActionsFonds = Range("TabActionsFonds")

Un grand merci par avance

[Pol63]

le forum a une balise code pour la mise en forme et coloration syntaxique

je n'ai pas la réponse à ta question, mais si tu lis un fichier excel pour en récupérer les données, c'est beaucoup plus performant d'ouvrir excel par code, et de faire un copier coller des données, et ensuite de récupérer ce qu'il y a dans le presse papier
ca solutionnera peut etre ton problème

[Danyel]

Erreur d'exécution '28': Espace pile insuffisant.

Quand on connait le fonctionnement de la pile, je vois mal comment on peut arriver à un espace insuffisant mise à part à une saturation de la memoire vive ... et encore ... quand le systeme a besoin de plus de memoire, il utilise le dd (par contre pas sur que la pile fasse pareil)